added missing extensions (Codex)

2026-06-28 04:16:30 -06:00 · 2026-06-05 08:25:21 +02:00
parent 8458a74e25
commit e65469ffb2
7 changed files with 246 additions and 7 deletions
@@ -36,4 +36,8 @@ lin InLN ln =
   let c = case ln.extCase of {True => Adess ; False => Iness}
   in {s = ln.s ! c} ;

+lin AdjLN ap ln = ln ** {
+      s = \\c => ap.s ! True ! NCase ln.n c ++ ln.s ! c
+      } ;
+
 }