blob: 7de175ffec31d0027c9945d24a89bdb756072b36 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
concrete FragmentSimple of FragmentAbstract = {
lin
s_p x y = { s = x.s ++ y.s };
np_d x y = { s = x.s ++ y.s };
np_p x = { s = x.s };
vp_t x y = { s = x.s ++ y.s };
d_a = { s = "a" };
d_m = { s = "many" };
n_c = { s = variants { "lion" ; "lions" } };
n_f = { s = "fish" };
v_e = { s = variants { "eats" ; "eat" } };
v_h = { s = variants { "hunts" ; "hunt" } };
}
|