godis tram grammars, augmented with Fin

This commit is contained in:
aarne
2006-11-08 15:08:09 +00:00
parent 1fd0113015
commit eb3d750459
45 changed files with 2626 additions and 0 deletions

View File

@@ -0,0 +1,32 @@
--# -path=.:prelude:resource-1.0/abstract:resource-1.0/common:resource-1.0/english
concrete GodisUserEng of GodisUser =
GodisUserI with (GodisLang = GodisLangEng);
-- open Prelude, GodisLangEng in {
-- lincat
-- S = SS;
-- Question = UserQuestion;
-- Action = UserAction;
-- Answer = UserAnswer;
-- ShortAns = UserShortAns;
-- lin
-- greet_S = ss ["hello"];
-- quit_S = variants{ ss ["goodbye"]; ss ["quit"] };
-- no_S = ss ["no"];
-- yes_S = ss ["yes"];
-- request_S x = x;
-- answer_S x = x;
-- ask_S x = x;
-- shortans_S x = x;
-- }