1
0
forked from GitHub/gf-rgl

use consistent lin X everywhere

This commit is contained in:
Krasimir Angelov
2025-11-14 14:12:57 +01:00
parent 48658e3689
commit c7fe453c12
58 changed files with 330 additions and 334 deletions

View File

@@ -81,7 +81,7 @@ oper
} ;
mkIrregA : Str -> A = \str -> makeIrregA str ;
mkIrregA : Str -> A = \str -> lin A (makeIrregA str) ;
mkA2 : A -> Str -> A2 ;
mkA2 a str = a ** {c2=str ; lock_A2 = <>} ;
@@ -169,7 +169,7 @@ oper
-- mkV0 : V -> V0 ;
mkVS : V -> VS; -- e.g drna
mkVS v = v ;
mkVS v = lin VS v ;
-- mkV2S : V -> Prep -> V2S ;
mkVV : V -> VV = -- e.g cahna
\v -> lin VV (v ** {isAux = False});
@@ -184,7 +184,7 @@ oper
-- mkVA : V -> VA ;
-- mkV2A : V -> Prep -> V2A ;
mkVQ : V -> VQ ; -- e.g janna
mkVQ v = v ;
mkVQ v = lin VQ v ;
-- mkV2Q : V -> Prep -> V2Q ;
--
-- mkAS : A -> AS ;