diff --git a/examples/morpho/Fre.gf b/examples/morpho/Fre.gf
index 54ebaf4d0..c27825163 100644
--- a/examples/morpho/Fre.gf
+++ b/examples/morpho/Fre.gf
@@ -12,7 +12,7 @@ cat
   TMood ; Number ; Person ; NumPersI ; Gender ; Mood ;
 
 fun
-  DAll : Word -> Display ;
+--  DAll : Word -> Display ;
   DForm : Word -> Form -> Display ;
 
   VInfin : Form ;
diff --git a/examples/morpho/FreDescr.gf b/examples/morpho/FreDescr.gf
index 0007986b2..dc6c8c67f 100644
--- a/examples/morpho/FreDescr.gf
+++ b/examples/morpho/FreDescr.gf
@@ -9,13 +9,13 @@ lincat
   TMood, Number, Person, NumPersI, Gender, Mood = Str ;
 
 lin
-  DAll w = w ++ ":" ++ "la conjugaison" ;
+--  DAll w = w ++ ":" ++ "la conjugaison" ;
 
   DForm w f = w ++ ":" ++ f ;
 
   VInfin = "infinitif" ;
   VFin m n p = m ++ n ++ p ;
-  VImper np = "imparfait" ++ np ;
+  VImper np = "impératif" ++ np ;
   VPart g n = "participe passé" ++ g ++ n ;
   VGer = "participe présent" ;
 
diff --git a/examples/morpho/FreReal.gf b/examples/morpho/FreReal.gf
index c9dfcc84d..86a56c164 100644
--- a/examples/morpho/FreReal.gf
+++ b/examples/morpho/FreReal.gf
@@ -16,6 +16,7 @@ lincat
 lin
   -- display the same subset of forms as Petit Robert
 
+{-
   DAll w = 
     w ! R.VInfin True ++
     w ! R.VFin (R.VPres R.Indic) R.Sg R.P1 ++ 
@@ -33,7 +34,7 @@ lin
     w ! R.VImper R.PlP1 ++
     w ! R.VGer ++
     w ! R.VPart R.Masc R.Sg ; 
-
+-}
   DForm w f = w ! f.v ++ f.s ; ---
 
   VInfin = {s = [] ; v = R.VInfin True} ;