GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-23 19:42:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

corrections in thai numerals

Browse Source
This commit is contained in:
aarne
2006-12-28 14:30:25 +00:00
parent cef20174f6
commit 83c5b57615
3 changed files with 15 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
examples/numerals/thai.gf
View File

@@ -3,6 +3,8 @@ include numerals.Abs.gf ;
-- Thai transliteration, produces thaiU.gf by GF/Text/Thai.hs
-- AR 28/12/2006
flags coding=utf8 ;
lincat
Numeral = {s : Str} ;
Digit = {s : DForm => Str} ;
@@ -18,10 +20,10 @@ lin
n2 = mkNum "s-Og" "y'i:E" "s-Og" ;
n3 = regNum "s-a:m" ;
n4 = regNum "s-i:E" ;
n5 = regNum "ha:E" ;
n4 = regNum "s-i:E" ; -- E = E48 '
n5 = regNum "hTa:" ; -- T = E49 9
n6 = regNum "ho?k" ;
n7 = regNum "ecMd'" ;
n7 = regNum "ecMd'" ; -- M = E47 w
n8 = regNum "e:pd'" ;
n9 = regNum "eka:" ;
@@ -63,5 +65,5 @@ oper
sip = table {Unit => "s'ib" ; Thousand => "hmv:En"} ;
roy = table {Unit => "rEOy'" ; Thousand => "se:n"} ;
roy = table {Unit => "rTOy'" ; Thousand => "se:n"} ;
phan = table {Unit => [] ; Thousand => "p2an"} ;