(Spa) add invarA + fix typo in after_Prep

2019-04-02 14:50:03 +02:00
parent 70e1292013
commit 63093fd459
2 changed files with 19 additions and 18 deletions
@@ -156,7 +156,7 @@ oper

 -- Some adjectives need the feminine form separately.

-    mkA : (espanol,espanola : Str) -> A ;
+    mkA : (español,española : Str) -> A ;

 -- One-place adjectives compared with "mas" need five forms in the worst
 -- case (masc and fem singular, masc plural, adverbial).
@@ -182,6 +182,8 @@ oper

  prefixA : A -> A ; -- adjective before noun (default after noun)

+  invarA : Str -> A  -- invariable adjective
+   = \s -> mkA s s s s s ;

 --3 Two-place adjectives
 --