Files
gf-core/test/srg/cyclic-direct/cyclic-direct.gf
2007-03-25 16:44:30 +00:00

7 lines
83 B
Plaintext

cat S;
fun f : S -> S ;
fun g : S ;
lin f s = { s = s.s } ;
lin g = { s = "g" } ;