summaryrefslogtreecommitdiff
path: root/examples/logic/LexTheoryEng.gf
blob: 165e1796d40a6614cfc6d24bbb223fc2979a6024 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
instance LexTheoryEng of LexTheory = open 
  GrammarEng, ParadigmsEng, IrregEng, ParamX in {
  oper
    assume_VS = mkVS (regV "assume") ;
    case_N = regN "case" ;
    contradiction_N = regN "contradiction" ;
    have_V2 = dirV2 have_V ;
    hypothesis_N = mk2N "hypothesis" "hypotheses" ;
    ifthen_DConj = {s1 = "if" ; s2 = "then" ; n = singular ; lock_DConj = <>} ;

    defNP s = {s = \\_ => s ; a = {n = Sg ; p = P3} ; lock_NP = <>} ;

}