mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-11 16:10:12 -06:00
some missing bits in Greek
This commit is contained in:
@@ -1,17 +1,21 @@
|
||||
--# -path=.:../greek:../common:../abstract:../prelude
|
||||
|
||||
resource TryGre = SyntaxGre, LexiconGre, ParadigmsGre ;
|
||||
|
||||
{-
|
||||
-[mkAdv, mkDet,mkQuant]**
|
||||
resource TryGre = SyntaxGre-[mkAdN,mkVoc], LexiconGre, ParadigmsGre - [mkAdN,mkAdv,mkVoc] **
|
||||
open (P = ParadigmsGre) in {
|
||||
|
||||
oper
|
||||
|
||||
oper
|
||||
mkAdv = overload SyntaxGre {
|
||||
mkAdv : Str -> Adv = P.mkAdv ;
|
||||
} ;
|
||||
|
||||
}
|
||||
mkVoc = overload {
|
||||
mkVoc : NP -> Voc = SyntaxGre.mkVoc ;
|
||||
mkVoc : Str -> Voc = P.mkVoc ;
|
||||
} ;
|
||||
|
||||
-}
|
||||
mkAdN = overload {
|
||||
mkAdN : CAdv -> AdN = SyntaxGre.mkAdN ;
|
||||
mkAdN : Str -> AdN = P.mkAdN ;
|
||||
} ;
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user