diff --git a/src/swedish/NamesSwe.gf b/src/swedish/NamesSwe.gf
index b36acf3e..89ae35e4 100644
--- a/src/swedish/NamesSwe.gf
+++ b/src/swedish/NamesSwe.gf
@@ -32,6 +32,12 @@ lin FullName gn sn = {
       isPron = False
       } ;
 
+    AdjLN ap ln = ln ** {
+      s = \\c => preOrPost ap.isPre 
+                   (ap.s ! agrAdj (gennum (ngen2gen ln.g) ln.n) (DDef Def))
+                   (ln.s ! c) ;
+      } ;
+
     InLN n = {s = "i" ++ n.s ! caseNP accusative} ;
 
 }