examples/attempto/LexAttemptoEng.gf


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34

instance LexAttemptoEng of LexAttempto = 
  open 
   ExtraEng,  
   SyntaxEng, 
   ParadigmsEng, 
   ConstructX, 
   (M = MakeStructuralEng),
   IrregEng in {

oper
  possible_A = mkA "possible" ;
  necessary_A = mkA "necessary" ;
  own_A = mkA "own" ;
  have_VV = mkVV have_V ;
  provably_Adv = ParadigmsEng.mkAdv "provably" ;
  provable_A = mkA "provable" ;
  false_A = mkA "false" ;
  such_A = mkA "such" ;
 
  genitiveNP np = mkNP (GenNP np) ;

  kilogram_CN = mkCN (mkN "kilogram") ;

  each_Det = ExtraEng.each_Det ;

  that_Subj = M.mkSubj "that" ;

  comma_and_Conj = mkConj [] ", and" plural ;
  comma_or_Conj = mkConj [] ", or" singular ;
  slash_Conj = mkConj [] "/" singular ;

  whose_IDet = M.mkIDet "whose" singular ;

}