progress with scandinavian

This commit is contained in:
aarne
2005-12-07 11:32:04 +00:00
parent 141fa43eb8
commit 0dfd8c1517
20 changed files with 414 additions and 316 deletions

View File

@@ -1,15 +1,15 @@
--concrete UntensedScand of Untensed = CatScand ** open ResScand in {
--
-- flags optimize=all_subs ;
--
-- lin
-- PosCl cl = {s = cl.s ! Pres ! Simul ! Pos ! ODir} ;
-- NegCl cl = {s = cl.s ! Pres ! Simul ! Neg ! ODir} ;
--
-- 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} ;
--
--}
incomplete concrete UntensedScand of Untensed = CatScand ** open ResScand 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} ;
}