diff --git a/src/portuguese/ExtendPor.gf b/src/portuguese/ExtendPor.gf
index cfba13e6..c91b169a 100644
--- a/src/portuguese/ExtendPor.gf
+++ b/src/portuguese/ExtendPor.gf
@@ -75,7 +75,7 @@ concrete ExtendPor of Extend = CatPor ** ExtendRomanceFunctor -
 
     CompoundAP noun adj = {
       s = \\af => case (aform2aagr af) of {
-        {n = n} => adj.s ! Posit ! (genNum2Aform noun.g n) ++ "de" ++ noun.s ! n
+        {n = n} => adj.s ! genNum2Aform noun.g n ++ "de" ++ noun.s ! n
         } ;
       isPre = adj.isPre ;
       copTyp = adj.copTyp
diff --git a/src/romance/ExtendRomanceFunctor.gf b/src/romance/ExtendRomanceFunctor.gf
index 1c74278a..c2331b53 100644
--- a/src/romance/ExtendRomanceFunctor.gf
+++ b/src/romance/ExtendRomanceFunctor.gf
@@ -214,7 +214,7 @@ incomplete concrete ExtendRomanceFunctor of Extend =
       } ;
     UttAdV av = av ;
     PositAdVAdj a = {
-      s = a.s ! Posit ! AA
+      s = a.s ! AA
       } ;
 
   lin
diff --git a/src/spanish/ExtendSpa.gf b/src/spanish/ExtendSpa.gf
index 03a350c2..1baf582b 100644
--- a/src/spanish/ExtendSpa.gf
+++ b/src/spanish/ExtendSpa.gf
@@ -78,7 +78,7 @@ concrete ExtendSpa of Extend = CatSpa ** ExtendRomanceFunctor -
 
     CompoundAP noun adj = {
       s = \\af => case (aform2aagr af) of {
-        {n = n} => adj.s ! Posit ! (genNum2Aform noun.g n) ++ "de" ++ noun.s ! n
+        {n = n} => adj.s ! genNum2Aform noun.g n ++ "de" ++ noun.s ! n
         } ;
       isPre = adj.isPre ;
       copTyp = adj.copTyp