summaryrefslogtreecommitdiff
path: root/next-lib/src/interlingua/PhraseIna.gf
diff options
context:
space:
mode:
Diffstat (limited to 'next-lib/src/interlingua/PhraseIna.gf')
-rw-r--r--next-lib/src/interlingua/PhraseIna.gf24
1 files changed, 0 insertions, 24 deletions
diff --git a/next-lib/src/interlingua/PhraseIna.gf b/next-lib/src/interlingua/PhraseIna.gf
deleted file mode 100644
index f5fa8d77a..000000000
--- a/next-lib/src/interlingua/PhraseIna.gf
+++ /dev/null
@@ -1,24 +0,0 @@
-concrete PhraseIna of Phrase = CatIna ** open Prelude, ResIna in {
-
- lin
- PhrUtt pconj utt voc = {s = pconj.s ++ utt.s ++ voc.s} ;
-
- UttS s = s ;
- UttQS qs = {s = qs.s ! OQuest};
- UttImpSg pol imp = {s = pol.s ++ imp.s ! pol.p ! Sg} ;
- UttImpPl pol imp = {s = pol.s ++ imp.s ! pol.p ! Pl} ;
- UttImpPol pol imp = {s = pol.s ++ imp.s ! pol.p ! Pl} ;
-
- UttIP ip = {s = ip.s ! Nom} ; -- ??? Dat, Abl also...
- UttIAdv iadv = iadv ;
- UttNP np = {s = np.s ! Nom} ;
- UttVP vp = {s = infVP vp} ;
- UttAdv adv = adv ;
-
- NoPConj = {s = []} ;
- PConjConj conj = ss conj.s2 ;
-
- NoVoc = {s = []} ;
- VocNP np = {s = "," ++ np.s ! Nom} ;
-
-}