ResourceHOWTO updafed

2006-03-01 16:17:19 +00:00
parent dea5aa4aaa
commit 07b58e1061
5 changed files with 455 additions and 240 deletions
--- a/resource-1.0/norwegian/MorphoNor.gf
+++ b/resource-1.0/norwegian/MorphoNor.gf
@@ -131,17 +131,6 @@ oper
      _  => vHusk spis 
      } ;

-  irregVerb : (drikke,drakk,drukket : Str) -> Verbum = 
-    \drikke,drakk,drukket ->
-    let
-      drikk = init drikke ;
-      drikker = case last (init drikke) of {
-        "r" => drikk ;
-        _   => drikke + "r"
-        }
-    in 
-    mkVerb6 drikke drikker  (drikke + "s") drakk drukket drikk ; 
-

 -- For $Numeral$.