started examples-3.0 with examples that are tested to work

This commit is contained in:
aarne
2008-06-17 13:16:15 +00:00
parent cf1210f824
commit 4fc362c06b
2 changed files with 6 additions and 6 deletions

View File

@@ -225,10 +225,10 @@ resource ResIna = ParamX ** open Prelude in {
};
tenseToVFrom = table {
Pres => VPres;
Past => VPast;
Fut => VFut;
Cond => VCond
Pres => VPres
;Past => VPast; --# notpresent
Fut => VFut; --# notpresent
Cond => VCond --# notpresent
};
insertInvarObj : Str -> VP -> VP = \obj -> insertObj "" Acc (mkInvarNP obj);