GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-22 09:32:53 -06:00
Code Issues Packages Projects Releases Wiki Activity

Thai phrasebook vocabulary from Nui

Browse Source
This commit is contained in:
aarne
2011-11-30 10:53:33 +00:00
parent 1547ccd7cc
commit 5f9c3301b6
2 changed files with 121 additions and 106 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
examples/phrasebook/GreetingsTha.gf
View File

@@ -2,7 +2,7 @@ concrete GreetingsTha of Greetings =
SentencesTha [Greeting,mkGreeting] **
open ResTha, Prelude in {
-- สุคสันต์วันเกิด
-- สุขสันต์วันเกิด
flags coding = utf8 ;
@@ -16,19 +16,20 @@ lin
GGoodMorning = mkGreeting (thword "สวัส" "ดี") ;
GGoodNight = mkGreeting (thword "รา" "ตรี" "สวัส" "ดิ์") ;
GGoodbye = mkGreeting (thword "ลา" "ก่อน") ;
GHello = mkGreeting (thword "หวัส" "ดี") ;
GHello = mkGreeting (thword "สวัส" "ดี") ;
GHelp = mkGreeting (thword "ช่วย" "ด้วย") ;
GHowAreYou = mkGreeting (thword "สบาย" "ดี" "ไหม") ;
GLookOut = mkGreeting (thword "ระ" "วัง") ; ---- google
GNiceToMeetYou, GNiceToMeetYouPol =
mkGreeting (thbind "ยิน" "ดี" "ฑี่" "ได้" "รู้" "จัก") ;
mkGreeting (thword "ยิน" "ดี" "ที่" "ได้" "รู้" "จัก") ;
GPleaseGive, GPleaseGivePol = mkGreeting (thword "ช่วย") ; ----
GSeeYouSoon = mkGreeting (thword "เจอ" "กัน" "นะ") ;
GSorry, GSorryPol = mkGreeting (thword "ขอ" "โทษ") ;
GThanks = mkGreeting (thword "ขอบ" "คุณ") ;
GTheCheck = mkGreeting (thword "เช็ค" "บิล") ;
GCongratulations = mkGreeting (thword "ยิน" "ดี" "ด้วย") ;
GHappyBirthday = mkGreeting (thword "สุค" "สันต์" "วัน" "เกิด") ;
GGoodLuck = mkGreeting (thword "โจค" "ดี" "นะ") ;
GHappyBirthday = mkGreeting (thword "สุข" "สันต์" "วัน" "เกิด") ;
GGoodLuck = mkGreeting (thword "โชค" "ดี" "นะ") ;
}