updated resource example

This commit is contained in:
aarne
2005-05-22 11:55:53 +00:00
parent 52b81f08a8
commit 60427e170c
14 changed files with 101 additions and 90 deletions

View File

@@ -1,21 +1,9 @@
--# -path=.:resource/french:resource/romance:resource/abstract:resource/../prelude
concrete AnimalsFre of Animals =
open
--- ResourceFre,
RulesFre, StructuralFre, VerbphraseFre,
ParadigmsFre, VerbsFre in {
lincat
Phrase = Phr ;
Animal = N ;
Action = V2 ;
concrete AnimalsFre of Animals = QuestionsFre **
open ResourceFre, ParadigmsFre, VerbsFre in {
lin
Who act obj = QuestPhrase (UseQCl (PosTP TPresent ASimul)
(IntVP who8one_IP (ComplV2 act (DefNumNP NoNum (UseN obj))))) ;
Whom subj act = QuestPhrase (UseQCl (PosTP TPresent ASimul)
(IntSlash who8one_IP (SlashV2 (DefOneNP (UseN subj)) act))) ;
Answer subj act obj = IndicPhrase (UseCl (PosTP TPresent ASimul)
(PredVP (DefOneNP (UseN subj)) (ComplV2 act (DefNumNP NoNum (UseN obj))))) ;
Dog = regN "chien" masculine ;
Cat = regN "chat" masculine ;
Mouse = regN "souris" feminine ;