(Romance) add lins

- add AdVVPSlash, AdvVPSlash, CountNP, PartNP - simplify opers using record extension - rm CountNP from NounPor
2018-06-26 17:35:37 -03:00
parent a730a3194b
commit 29c044a315
4 changed files with 18 additions and 28 deletions
@@ -1,11 +1,4 @@
 concrete NounPor of Noun = CatPor ** NounRomance with
  (ResRomance = ResPor) ** open Prelude, PhonoPor in {

-  lin
-    -- not implemented for romance languages, maybe because it can't
-    -- be done elegantly?
-    CountNP det np = heavyNPpol np.isNeg
-      {s = \\c => det.s ! np.a.g ! c ++ (np.s ! c).ton ;
-       a = np.a ** {n = det.n} } ;
-
 } ;