started Croatian, some noun declensions in place

src/croatian/RelativeHrv.gf

@@ -0,0 +1,18 @@
+concrete RelativeHrv of Relative = CatHrv ** open
+  ParadigmsHrv,
+  ResHrv,
+  Prelude in {
+
+lin
+    RelVP rp vp = vp ** {
+      subj  =
+        let rel = (adjFormsAdjective rp).s
+	in \\a => case a of {
+	  Ag g n _ => rel ! g ! n ! Nom
+	  } 
+      } ;
+      
+    IdRP = mkA "který" ; 
+
+
+}