msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

slight refactoring of Phrasebook, with less start words

Browse Source
This commit is contained in:
aarne
2010-12-07 12:32:57 +00:00
parent e1c7cddc6c
commit e4b330b8cc
34 changed files with 398 additions and 447 deletions
Download Patch File Download Diff File Expand all files Collapse all files

49
examples/phrasebook/GreetingsNor.gf
View File

@@ -1,30 +1,27 @@
concrete GreetingsNor of Greetings = open Prelude in {
lincat
Greeting = SS ;
concrete GreetingsNor of Greetings = SentencesNor [Greeting,mkGreeting] ** open Prelude in {
lin
GBye = ss "ha det" ;
GCheers = ss "skål" ; -- google translate !
GDamn = ss "faen" ;
GExcuse, GExcusePol = ss "unnskyld" ;
GGoodDay = ss "god dag" ;
GGoodEvening = ss "god kveld" ;
GGoodMorning = ss "god morgen" ;
GGoodNight = ss "god natt" ;
GGoodbye = ss "ha det bra" ;
GHello = ss "hei" ;
GHelp = ss "hjelp" ;
GHowAreYou = ss "hvordan går det" ;
GLookOut = ss "se opp" ; -- google translate !
GNiceToMeetYou, GNiceToMeetYouPol = ss "hyggelig å treffe deg" ;
GPleaseGive, GPleaseGivePol = ss "vær så snill" ;
GSeeYouSoon = ss "se deg snart" ; -- google translate !
GSorry, GSorryPol = ss "beklager" ;
GThanks = ss "takk" ;
GTheCheck = ss "regningen" ;
GCongratulations = ss "gratulerer";
GHappyBirthday = ss "gratulerer med dagen" ;
GGoodLuck = ss "lykke til" ;
GBye = mkGreeting "ha det" ;
GCheers = mkGreeting "skål" ; -- google translate !
GDamn = mkGreeting "faen" ;
GExcuse, GExcusePol = mkGreeting "unnskyld" ;
GGoodDay = mkGreeting "god dag" ;
GGoodEvening = mkGreeting "god kveld" ;
GGoodMorning = mkGreeting "god morgen" ;
GGoodNight = mkGreeting "god natt" ;
GGoodbye = mkGreeting "ha det bra" ;
GHello = mkGreeting "hei" ;
GHelp = mkGreeting "hjelp" ;
GHowAreYou = mkGreeting "hvordan går det" ;
GLookOut = mkGreeting "se opp" ; -- google translate !
GNiceToMeetYou, GNiceToMeetYouPol = mkGreeting "hyggelig å treffe deg" ;
GPleaseGive, GPleaseGivePol = mkGreeting "vær så snill" ;
GSeeYouSoon = mkGreeting "se deg snart" ; -- google translate !
GSorry, GSorryPol = mkGreeting "beklager" ;
GThanks = mkGreeting "takk" ;
GTheCheck = mkGreeting "regningen" ;
GCongratulations = mkGreeting "gratulerer";
GHappyBirthday = mkGreeting "gratulerer med dagen" ;
GGoodLuck = mkGreeting "lykke til" ;
}