diff --git a/lib/src/persian/NumeralPes.gf b/lib/src/persian/NumeralPes.gf index 6a1419a7f..7eec9930f 100644 --- a/lib/src/persian/NumeralPes.gf +++ b/lib/src/persian/NumeralPes.gf @@ -71,16 +71,16 @@ lin pot3plus n m = { -- tail = inc i.tail } ; -} - D_0 = mkDig "?" ; - D_1 = mk3Dig "?" "" Pl; - D_2 = mk2Dig "?" ""; - D_3 = mk2Dig "?" "سوم" ; - D_4 = mkDig "?" ; - D_5 = mkDig "?" ; - D_6 = mkDig "?" ; - D_7 = mkDig "?" ; - D_8 = mkDig "?" ; - D_9 = mkDig "?" ; + D_0 = mkDig "0" ; + D_1 = mk3Dig "1" "" Pl; + D_2 = mk2Dig "2" ""; + D_3 = mk2Dig "3" "سوم" ; + D_4 = mkDig "4" ; + D_5 = mkDig "5" ; + D_6 = mkDig "6" ; + D_7 = mkDig "7" ; + D_8 = mkDig "8" ; + D_9 = mkDig "9" ; -- lin IDig d = { s = \\_ => d.s ; n = Sg} ; lin IIDig d dg = { s = \\df => d.s ! NCard ++ dg.s ! df ; n = Pl}; diff --git a/lib/src/persian/translit.gfs b/lib/src/persian/translit.gfs index 87d9b8902..8a392965c 100644 --- a/lib/src/persian/translit.gfs +++ b/lib/src/persian/translit.gfs @@ -8,4 +8,3 @@ rf -file=src/IdiomPes.gf | ps -env=quotes -to_persian | wf -file=IdiomPes.gf rf -file=src/RelativePes.gf | ps -env=quotes -to_persian | wf -file=RelativePes.gf rf -file=src/AdverbPes.gf | ps -env=quotes -to_persian | wf -file=AdverbPes.gf rf -file=src/SentencePes.gf | ps -env=quotes -to_persian | wf -file=SentencePes.gf -rf -file=src/NumeralPes.gf | ps -env=quotes -to_persian | wf -file=NumeralPes.gf \ No newline at end of file