forked from GitHub/gf-core
27 lines
496 B
Plaintext
27 lines
496 B
Plaintext
include tut1.Abs.gf ;
|
|
|
|
lincat S = {s : Str} ;
|
|
lincat NP = {s : Str} ;
|
|
lincat A1 = {s : Str} ;
|
|
lincat CN = {s : Str} ;
|
|
lin PredA1 Q F =
|
|
{s = Q.s ++ "est" ++ F.s} ;
|
|
lin CondS A B =
|
|
{s = "si" ++ A.s ++ "alors" ++ B.s} ;
|
|
lin DisjA1 F G =
|
|
{s = F.s ++ "ou" ++ G.s} ;
|
|
lin Every A =
|
|
{s = "tout" ++ A.s} ;
|
|
lin ModA1 A F =
|
|
{s = A.s ++ F.s} ;
|
|
lin Number =
|
|
{s = "nombre"} ;
|
|
lin Even =
|
|
{s = "pair"} ;
|
|
lin Odd =
|
|
{s = "impair"} ;
|
|
lin Prime =
|
|
{s = "premier"} ;
|
|
lin Zero =
|
|
{s = "zéro"} ;
|