summaryrefslogtreecommitdiff
path: root/gf-book/examples/chapter6/AggregationEng.gf
blob: 9ed403c79a8b59d4155babb950bd2ffad7cc7a8c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
concrete AggregationEng of Aggregation = {

lincat S, NP, VP = Str ;

lin 
  PredVP x y = x ++ y ;
  ConjS  a b = a ++ "or" ++ b ;
  ConjVP a b = a ++ "or" ++ b ;
  ConjNP a b = a ++ "or" ++ b ;

  Run = "runs" ;
  Walk = "walks" ;
  John = "John" ;
  Mary = "Mary" ;

}