added trivial morphological functions

This commit is contained in:
krangelov
2019-03-12 20:39:49 +01:00
parent 6f4dacf26f
commit 664a413df8
5 changed files with 35 additions and 13 deletions

View File

@@ -74,7 +74,7 @@ resource ResTur = ParamX ** open Prelude, Predef, HarmonyTur in {
} ;
-- Prep
no_Prep = mkPrep [] Acc;
noPrep = mkPrep [] Acc;
mkPrep : Str -> Case -> {s : Str; c : Case; lock_Prep : {}} =
\s, c -> lin Prep {s=s; c=c};