new tutorial almost finished

2 files changed, 12 insertions, 3 deletions

diff --git a/doc/tutorial/resource-food/FoodEng.gf b/doc/tutorial/resource-food/FoodEng.gf
new file mode 100644
index 000000000..0fdf8235c
--- /dev/null
+++ b/doc/tutorial/resource-food/FoodEng.gf
@@ -0,0 +1,9 @@
+--# -path=.:present:prelude
+
+concrete FoodEng of Food = FoodI - [Pizza] with 
+  (Syntax = SyntaxEng),
+  (LexFood = LexFoodEng) ** 
+    open SyntaxEng, ParadigmsEng in {
+
+  lin Pizza = mkCN (mkA "Italian") (mkN "pie") ;
+}
diff --git a/doc/tutorial/resource-food/FoodFre.gf b/doc/tutorial/resource-food/FoodFre.gf
index fe9e22a40..60b8f0dc2 100644
--- a/doc/tutorial/resource-food/FoodFre.gf
+++ b/doc/tutorial/resource-food/FoodFre.gf
@@ -10,9 +10,9 @@ concrete FoodFre of Food = open SyntaxFre,ParadigmsFre in {
 
   lin
     Is item quality = mkUtt (mkCl item quality) ;
-    This kind = SyntaxFre.mkNP (mkDet this_Quant) kind ;
-    That kind = SyntaxFre.mkNP (mkDet that_Quant) kind ;
-    All kind = SyntaxFre.mkNP all_Predet (SyntaxFre.mkNP defPlDet kind) ;
+    This kind = mkNP (mkDet this_Quant) kind ;
+    That kind = mkNP (mkDet that_Quant) kind ;
+    All kind = mkNP all_Predet (mkNP defPlDet kind) ;
     QKind quality kind = mkCN quality kind ;
     Wine = mkCN (mkN "vin") ;
     Beer = mkCN (mkN "bière") ;