summaryrefslogtreecommitdiff
path: root/examples/phrasebook/SentencesUrd.gf
blob: be3538ba3178ea51bb556c28e34a29a0af73f19b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
concrete SentencesUrd of Sentences =  NumeralUrd ** SentencesI - [sing,YouFamFemale] with 
  (Syntax = SyntaxUrd),
  (Symbolic = SymbolicUrd),
  (Lexicon = LexiconUrd)  **
  open
  (S=SyntaxUrd),
  (P=ParadigmsUrd) in {
lin YouFamFemale = mkPersonUrd youSg_Pron "تیری" ;
  
oper   
  mkPersonUrd : Pron -> Str -> {name : NP ; isPron : Bool ; poss : Quant} = \p,s -> 
    {name = mkNP (P.mkN s) ; isPron = True ; poss = mkQuant p} ;
  } ;