forked from GitHub/gf-core
12 lines
171 B
Plaintext
12 lines
171 B
Plaintext
concrete AdjectiveSwa of Adjective = CatSwa ** open ResSwa, Prelude , ParamX in {
|
|
|
|
lin
|
|
|
|
PositA a = {
|
|
s = a.s ! Posit ;
|
|
} ;
|
|
|
|
-- PositA a = a;
|
|
|
|
}
|