blob: 29c2f21fc77f54771ed8e2197753cb7a3520f7d7 (
plain)
1
2
3
4
5
6
7
8
9
|
instance LexTheoryEng of LexTheory = open GrammarEng,ParadigmsEng,IrregEng 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 = <>} ;
}
|