mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-14 17:40:12 -06:00
Automatic whitespace removal
This commit is contained in:
@@ -2,10 +2,10 @@
|
||||
|
||||
resource MakeStructuralFin = open CatFin, ParadigmsFin, MorphoFin, Prelude in {
|
||||
|
||||
oper
|
||||
mkConj : Str -> Str -> ParadigmsFin.Number -> Conj = \x,y,n ->
|
||||
oper
|
||||
mkConj : Str -> Str -> ParadigmsFin.Number -> Conj = \x,y,n ->
|
||||
{s1 = x ; s2 = y ; n = n ; lock_Conj = <>} ;
|
||||
mkSubj : Str -> Subj = \x ->
|
||||
mkSubj : Str -> Subj = \x ->
|
||||
{s = x ; lock_Subj = <>} ;
|
||||
mkIQuant : Str -> IQuant = \s ->
|
||||
{s = \\n,c => s ; lock_IQuant = <>} ; ----
|
||||
@@ -23,7 +23,7 @@ oper
|
||||
isNeg = isNeg ;
|
||||
} ;
|
||||
} ;
|
||||
|
||||
|
||||
partDet : N -> Number -> Det = \s,n ->
|
||||
lin Det (MorphoFin.partDet False n s) ;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user