the names API in more languages

src/chinese/DocumentationChi.gf

@@ -112,26 +112,26 @@ lin
     } ;
 
   InflectionPN = \n -> {
-    t  = "v" ;
+    t  = "pn" ;
     s1 = heading1 "Proper Name" ;
     s2 = n.s
     } ;
 
   InflectionLN = \n -> {
-    t  = "v" ;
+    t  = "pn" ;
     s1 = heading1 "Location Name" ;
     s2 = n.s
     } ;
 
   InflectionGN = \n -> {
-    t  = "v" ;
+    t  = "pn" ;
     s1 = heading1 "Given Name" ;
     s2 = n.s
     } ;
 
   InflectionSN = \n -> {
-    t  = "v" ;
-    s1 = heading1 "Surname Name" ;
+    t  = "pn" ;
+    s1 = heading1 "Family Name" ;
     s2 = n.s
     } ;
 

src/chinese/NamesChi.gf

@@ -1,4 +1,4 @@
-concrete NamesChi of Names = CatChi ** {
+concrete NamesChi of Names = CatChi ** open ResChi, ParadigmsChi, Prelude in {
 
 lin GivenName, MaleSurname, FemaleSurname, PlSurname = \n -> n ** {det = []} ;
 lin FullName gn sn = {
@@ -6,6 +6,10 @@ lin FullName gn sn = {
        det = []
     } ;
 
-lin UseLN pn = pn ** {det = []} ;
+lin UseLN ln = ln ** {det = []} ;
+
+lin InLN ln = 
+  let prep : Prep = mkPrep "里" []
+  in ss (appPrep prep (linNP (ln ** {det = []}))) ** {advType = prep.advType ; hasDe = prep.hasDe} ; --- should depend on np too ?
 
 }