mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 21:19:31 -06:00
21 lines
411 B
Plaintext
21 lines
411 B
Plaintext
--# -path=.:alltenses:prelude
|
|
|
|
incomplete concrete ArithmI of Arithm = open Lang, Lex in {
|
|
|
|
lincat
|
|
Prop = S ;
|
|
Nat = NP ;
|
|
|
|
lin
|
|
Zero =
|
|
UsePN zero_PN ;
|
|
Succ n =
|
|
DetCN (DetSg (SgQuant DefArt) NoOrd) (ComplN2 successor_N2 n) ;
|
|
Even n =
|
|
UseCl TPres ASimul PPos
|
|
(PredVP n (UseComp (CompAP (PositA even_A)))) ;
|
|
And x y =
|
|
ConjS and_Conj (BaseS x y) ;
|
|
|
|
}
|