added missing InLN and dayMonthYearAdv in Fin

2026-06-26 03:26:27 -06:00 · 2024-01-30 16:23:17 +01:00
parent 4a12ecd9d3
commit d98bb99fc1
4 changed files with 14 additions and 15 deletions
@@ -32,12 +32,8 @@ lin UseLN, PlainLN = \ln -> {
      isPron = False ; isNeg = False
      } ;

-lin InLP ln = {
-      s = appCompl True Pos ln.c { s = snoun2np ln.n ln ;
-                                   a = agrP3 ln.n ;
-                                   isPron = False ;
-                                   isNeg = False
-                                 }
-   } ;
+lin InLN ln =
+   let c = case ln.extCase of {True => Adess ; False => Iness}
+   in {s = ln.s ! c} ;

 }