added TryX modules for trying out resource API

This commit is contained in:
aarne
2007-10-09 08:58:48 +00:00
parent 67420e3c9d
commit 85ad81743e
19 changed files with 70 additions and 33 deletions

View File

@@ -59,8 +59,9 @@ alltenses:
$(GFCC) api/Syntax???.gf
cp -p api/Constructors*.gfc api/Constructors*.gfr ../alltenses
cp -p api/Syntax*.gfc api/Syntax*.gfr ../alltenses
$(GFCC) api/Try???.gf
$(GFCC) -path=alltenses:prelude:api:api/toplevel api/toplevel/OverLangEng.gf
mv api/toplevel/Over*.gfc ../alltenses
mv api/toplevel/Over*.gfc api/Try*.gf? ../alltenses
langs:
echo "s ;; pm | wf langs.gfcm" | $(GFCA) -path=present:prelude ../present/Lang???.gfc $(RTSS)
@@ -101,8 +102,9 @@ present: chmod
$(GFCCP) -path=api:present:prelude api/Syntax???.gf
mv api/Constructors*.gfc api/Constructors*.gfr ../present
mv api/Syntax*.gfc api/Syntax*.gfr ../present
$(GFCCP) -path=api:present:prelude api/Try???.gf
$(GFCCP) -path=present:prelude:api:api/toplevel api/toplevel/OverLangEng.gf
mv api/toplevel/Over*.gfc ../present
mv api/toplevel/Over*.gfc api/Try???.gf? ../present
mathematical:

View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses:prelude
resource TryDan = SyntaxDan, LexiconDan, ParadigmsDan - [mkAdv] ;

View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses:prelude
resource TryEng = SyntaxEng, LexiconEng, ParadigmsEng - [mkAdv] ;

View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses:prelude
resource TryFin = SyntaxFin, LexiconFin-[mkOrd], ParadigmsFin - [mkAdv] ;

View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses:prelude
resource TryFre = SyntaxFre, LexiconFre, ParadigmsFre - [mkAdv] ;

View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses:prelude
resource TryGer = SyntaxGer, LexiconGer, ParadigmsGer - [mkAdv] ;

View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses:prelude
resource TryIta = SyntaxIta, LexiconIta, ParadigmsIta - [mkAdv,in_Prep] ;

View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses:prelude
resource TryNor = SyntaxNor, LexiconNor, ParadigmsNor - [mkAdv] ;

View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses:prelude
resource TryRus = SyntaxRus, LexiconRus, ParadigmsRus - [mkAdv] ;

View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses:prelude
resource TrySpa = SyntaxSpa, LexiconSpa, ParadigmsSpa - [mkAdv] ;

View File

@@ -0,0 +1,3 @@
--# -path=.:alltenses:prelude
resource TrySwe = SyntaxSwe, LexiconSwe, ParadigmsSwe - [mkAdv] ;

View File

@@ -271,12 +271,12 @@ oper
mkAV : A -> AV ;
mkA2V : A -> Prep -> A2V ;
-- Notice: categories $V2S, V2V, V2A, V2Q$ are in v 1.0 treated
-- Notice: categories $V2S, V2V, V2Q$ are in v 1.0 treated
-- just as synonyms of $V2$, and the second argument is given
-- as an adverb. Likewise $AS, A2S, AV, A2V$ are just $A$.
-- $V0$ is just $V$.
V0, V2S, V2V, V2A, V2Q : Type ;
V0, V2S, V2V, V2Q : Type ;
AS, A2S, AV, A2V : Type ;
--.
@@ -443,7 +443,7 @@ oper
mkA2V v p = mkA2 v p ** {lock_A = <>} ;
V0 : Type = V ;
V2S, V2V, V2Q, V2A : Type = V2 ;
V2S, V2V, V2Q : Type = V2 ;
AS, A2S, AV : Type = A ;
A2V : Type = A2 ;

View File

@@ -10,6 +10,11 @@ To try out inflection paradigms:
> i -path=alltenses:prelude -retain alltenses/ParadigmsGer.gfr
> cc mkN "Farbe"
```
To try out overloaded syntax, test lexicon, and inflection paradigms:
```
> i -path=alltenses:prelude -retain alltenses/TryGer.gfr
> cc mkCl (mkNP this_QuantSg (mkN "Farbe")) (mkA "dunkel")
```
To look for a syntax tree in the overload API by parsing:
```
> i -path=alltenses:prelude alltenses/OverLangEng.gfc

View File

@@ -3786,7 +3786,7 @@ source <A HREF="../italian/ParadigmsIta.gf"><CODE>http://www.cs.chalmers.se/~aar
<TD><CODE>Number</CODE></TD>
</TR>
<TR>
<TD><CODE>Prep</CODE></TD>
<TD><CODE>--Prep</CODE></TD>
<TD><CODE>Type</CODE></TD>
</TR>
<TR>
@@ -4505,10 +4505,6 @@ source <A HREF="../spanish/ParadigmsSpa.gf"><CODE>http://www.cs.chalmers.se/~aar
<TD><CODE>Number</CODE></TD>
</TR>
<TR>
<TD><CODE>Prep</CODE></TD>
<TD><CODE>Type</CODE></TD>
</TR>
<TR>
<TD><CODE>accusative</CODE></TD>
<TD><CODE>Prep</CODE></TD>
</TR>
@@ -4964,6 +4960,13 @@ To try out inflection paradigms:
&gt; cc mkN "Farbe"
</PRE>
<P>
To try out overloaded syntax, test lexicon, and inflection paradigms:
</P>
<PRE>
&gt; i -path=alltenses:prelude -retain alltenses/TryGer.gfr
&gt; cc mkCl (mkNP this_QuantSg (mkN "Farbe")) (mkA "dunkel")
</PRE>
<P>
To look for a syntax tree in the overload API by parsing:
</P>
<PRE>

View File

@@ -258,12 +258,12 @@ mkV2 : overload {
mkAV : A -> AV ;
mkA2V : A -> Prep -> A2V ;
-- Notice: categories $V2S, V2V, V2A, V2Q$ are in v 1.0 treated
-- Notice: categories $V2S, V2V, V2Q$ are in v 1.0 treated
-- just as synonyms of $V2$, and the second argument is given
-- as an adverb. Likewise $AS, A2S, AV, A2V$ are just $A$.
-- $V0$ is just $V$.
V0, V2S, V2V, V2A, V2Q : Type ;
V0, V2S, V2V, V2Q : Type ;
AS, A2S, AV, A2V : Type ;
@@ -438,7 +438,7 @@ mkV2 : overload {
mkVV v = v ** {isAux = False ; lock_VV = <>} ;
V0 : Type = V ;
V2S, V2V, V2Q, V2A : Type = V2 ;
V2S, V2V, V2Q : Type = V2 ;
AS, A2S, AV : Type = A ;
A2V : Type = A2 ;

View File

@@ -58,7 +58,7 @@ oper
-- amalgamate with the following word (the 'genitive' "di" and the
-- 'dative' "a").
Prep : Type ;
--Prep : Type ;
accusative : Prep ;
genitive : Prep ;
@@ -291,16 +291,16 @@ oper
singular = Sg ;
plural = Pl ;
Prep = Compl ;
--Prep = Compl ;
accusative = complAcc ;
genitive = complGen ;
dative = complDat ;
mkPrep p = {s = p ; c = Acc ; isDir = False} ;
mkPrep p = {s = p ; c = Acc ; isDir = False ; lock_Prep = <>} ;
con_Prep = {s = [] ; c = CPrep P_con ; isDir = False} ;
da_Prep = {s = [] ; c = CPrep P_da ; isDir = False} ;
in_Prep = {s = [] ; c = CPrep P_in ; isDir = False} ;
su_Prep = {s = [] ; c = CPrep P_su ; isDir = False} ;
con_Prep = {s = [] ; c = CPrep P_con ; isDir = False ; lock_Prep = <>} ;
da_Prep = {s = [] ; c = CPrep P_da ; isDir = False ; lock_Prep = <>} ;
in_Prep = {s = [] ; c = CPrep P_in ; isDir = False ; lock_Prep = <>} ;
su_Prep = {s = [] ; c = CPrep P_su ; isDir = False ; lock_Prep = <>} ;
mk2N x y g = mkNounIrreg x y g ** {lock_N = <>} ;
regN x = mkNomReg x ** {lock_N = <>} ;

View File

@@ -259,12 +259,12 @@ oper
mkAV : A -> AV ;
mkA2V : A -> Prep -> A2V ;
-- Notice: categories $V2S, V2V, V2A, V2Q$ are in v 1.0 treated
-- Notice: categories $V2S, V2V, V2Q$ are in v 1.0 treated
-- just as synonyms of $V2$, and the second argument is given
-- as an adverb. Likewise $AS, A2S, AV, A2V$ are just $A$.
-- $V0$ is just $V$.
V0, V2S, V2V, V2A, V2Q : Type ;
V0, V2S, V2V, V2Q : Type ;
AS, A2S, AV, A2V : Type ;
@@ -429,7 +429,7 @@ oper
mkA2V v p = mkA2 v p ** {lock_A = <>} ;
V0 : Type = V ;
V2S, V2V, V2Q, V2A : Type = V2 ;
V2S, V2V, V2Q : Type = V2 ;
AS, A2S, AV : Type = A ;
A2V : Type = A2 ;

View File

@@ -57,8 +57,6 @@ oper
-- amalgamate with the following word (the 'genitive' "de" and the
-- 'dative' "a").
Prep : Type ;
accusative : Prep ;
genitive : Prep ;
dative : Prep ;
@@ -293,11 +291,10 @@ oper
singular = Sg ;
plural = Pl ;
Prep = Compl ;
accusative = complAcc ;
genitive = complGen ;
dative = complDat ;
mkPrep p = {s = p ; c = Acc ; isDir = False} ;
accusative = complAcc ** {lock_Prep = <>} ;
genitive = complGen ** {lock_Prep = <>} ;
dative = complDat ** {lock_Prep = <>} ;
mkPrep p = {s = p ; c = Acc ; isDir = False ; lock_Prep = <>} ;
mk2N x y g = mkNounIrreg x y g ** {lock_N = <>} ;

View File

@@ -283,12 +283,12 @@ oper
mkAV : A -> AV ;
mkA2V : A -> Prep -> A2V ;
-- Notice: categories $V2S, V2V, V2A, V2Q$ are in v 1.0 treated
-- Notice: categories $V2S, V2V, V2Q$ are in v 1.0 treated
-- just as synonyms of $V2$, and the second argument is given
-- as an adverb. Likewise $AS, A2S, AV, A2V$ are just $A$.
-- $V0$ is just $V$.
V0, V2S, V2V, V2A, V2Q : Type ;
V0, V2S, V2V, V2Q : Type ;
AS, A2S, AV, A2V : Type ;
--.
@@ -596,7 +596,7 @@ oper
mkV2A v p = mmkV2 v p ** {lock_V2A = <>} ;
V0 : Type = V ;
V2S, V2V, V2Q, V2A : Type = V2 ;
V2S, V2V, V2Q : Type = V2 ;
AS, A2S, AV : Type = A ;
A2V : Type = A2 ;