summaryrefslogtreecommitdiff
path: root/examples/phrasebook/Sentences.gf
blob: 7afd694359aa62a3e97a329d84435ffb77cbecb7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
abstract Sentences = Numeral ** {

  cat
    Sentence ; Object ; Item ; Kind ; Quality ;

  fun
    Is    : Item -> Quality -> Sentence ;
    IsNot : Item -> Quality -> Sentence ;

    IWant : Object -> Sentence ;
    ILike : Item -> Sentence ; 
    DoYouHave : Kind -> Sentence ;
    WhetherIs : Item -> Quality -> Sentence ;
    ObjItem : Item -> Object ;
    ObjNumber : Numeral -> Kind -> Object ;
    
    This, That, These, Those : Kind -> Item ;
    SuchKind : Quality -> Kind -> Kind ;
    Very : Quality -> Quality ;

}