mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-24 03:52:50 -06:00
15 lines
367 B
Plaintext
15 lines
367 B
Plaintext
|
|
concrete TestVars of TestVarsA = open TestVarsR in {
|
|
|
|
lincat S = { s : XYZ => Str; p : { s : Str; a : AB } };
|
|
|
|
lin a = { s = table { X _ => variants { "x1" ; "x2" };
|
|
Y => variants { "y1" ; "y2" };
|
|
_ => variants { "z1" ; "z2" } };
|
|
p = variants { { s = "s1" ; a = A } ;
|
|
{ s = "s2" ; a = B } };
|
|
};
|
|
|
|
}
|
|
|