mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-23 03:32:51 -06:00
16 lines
407 B
Plaintext
16 lines
407 B
Plaintext
concrete UntensedGer of Untensed = CatGer ** open ResGer in {
|
|
|
|
flags optimize=all_subs ;
|
|
|
|
lin
|
|
PosCl cl = {s = cl.s ! Pres ! Simul ! Pos} ;
|
|
NegCl cl = {s = cl.s ! Pres ! Simul ! Neg} ;
|
|
|
|
PosQCl cl = {s = cl.s ! Pres ! Simul ! Pos} ;
|
|
NegQCl cl = {s = cl.s ! Pres ! Simul ! Neg} ;
|
|
|
|
-- PosRCl cl = {s = cl.s ! Pres ! Simul ! Pos} ;
|
|
-- NegRCl cl = {s = cl.s ! Pres ! Simul ! Neg} ;
|
|
--
|
|
}
|