diff --git a/testsuite/lpgf/Foods.treebank b/testsuite/lpgf/Foods.treebank
index 6e56e7206..7e9fbd39b 100644
--- a/testsuite/lpgf/Foods.treebank
+++ b/testsuite/lpgf/Foods.treebank
@@ -2,6 +2,7 @@ Foods: Pred (That Wine) Delicious
 FoodsBul: онова вино е превъзходно
 FoodsChi: 那 瓶 酒 是 美 味 的
 FoodsEng: that wine is delicious
+FoodsFin: tuo viini on herkullinen
 FoodsHeb: היין ההוא טעים
 FoodsSwe: det där vinet är läckert
 
@@ -9,6 +10,7 @@ Foods: Pred (This Pizza) (Very Boring)
 FoodsBul: тази пица е много еднообразна
 FoodsChi: 这 张 比 萨 饼 是 非 常 难 吃 的
 FoodsEng: this pizza is very boring
+FoodsFin: tämä pizza on erittäin tylsä
 FoodsHeb: הפיצה הזאת מאוד משעממת
 FoodsSwe: den här pizzan är mycket tråkig
 
@@ -16,6 +18,7 @@ Foods: Pred (This Cheese) Fresh
 FoodsBul: това сирене е свежо
 FoodsChi: 这 块 奶 酪 是 新 鲜 的
 FoodsEng: this cheese is fresh
+FoodsFin: tämä juusto on tuore
 FoodsHeb: הגבינה הזאת טריה
 FoodsSwe: den här osten är färsk
 
@@ -23,6 +26,7 @@ Foods: Pred (Those Fish) Warm
 FoodsBul: онези риби са горещи
 FoodsChi: 那 几 条 鱼 是 温 热 的
 FoodsEng: those fish are warm
+FoodsFin: nuo kalat ovat lämpimiä
 FoodsHeb: הדגים ההם חמים
 FoodsSwe: de där fiskarna är varma
 
@@ -30,6 +34,7 @@ Foods: Pred (That (Mod Boring (Mod Italian Pizza))) Expensive
 FoodsBul: онази еднообразна италианска пица е скъпа
 FoodsChi: 那 张 又 难 吃 又 意 大 利 式 的 比 萨 饼 是 昂 贵 的
 FoodsEng: that boring Italian pizza is expensive
+FoodsFin: tuo tylsä italialainen pizza on kallis
 FoodsHeb: הפיצה האיטלקית המשעממת ההיא יקרה
 FoodsSwe: den där tråkiga italienska pizzan är dyr
 
diff --git a/testsuite/lpgf/FoodsFin.gf b/testsuite/lpgf/FoodsFin.gf
new file mode 100644
index 000000000..962199805
--- /dev/null
+++ b/testsuite/lpgf/FoodsFin.gf
@@ -0,0 +1,6 @@
+
+-- (c) 2009 Aarne Ranta under LGPL
+
+concrete FoodsFin of Foods = FoodsI with 
+  (Syntax = SyntaxFin),
+  (LexFoods = LexFoodsFin) ;
diff --git a/testsuite/lpgf/LexFoodsFin.gf b/testsuite/lpgf/LexFoodsFin.gf
new file mode 100644
index 000000000..da6a26b8a
--- /dev/null
+++ b/testsuite/lpgf/LexFoodsFin.gf
@@ -0,0 +1,21 @@
+-- (c) 2009 Aarne Ranta under LGPL
+--# -coding=latin1
+
+instance LexFoodsFin of LexFoods = 
+    open SyntaxFin, ParadigmsFin in {
+  oper
+    wine_N = mkN "viini" ;
+    pizza_N = mkN "pizza" ;
+    cheese_N = mkN "juusto" ;
+    fish_N = mkN "kala" ;
+    fresh_A = mkA "tuore" ;
+    warm_A = mkA 
+    (mkN "l�mmin" "l�mpim�n" "l�mmint�" "l�mpim�n�" "l�mpim��n" 
+         "l�mpimin�" "l�mpimi�" "l�mpimien" "l�mpimiss�" "l�mpimiin"
+	 ) 
+    "l�mpim�mpi" "l�mpimin" ;
+    italian_A = mkA "italialainen" ;
+    expensive_A = mkA "kallis" ;
+    delicious_A = mkA "herkullinen" ;
+    boring_A = mkA "tyls�" ;
+}