concrete GreetingsDut of Greetings = SentencesDut [Greeting,mkGreeting] ** open Prelude in {


lin 
  GBye = mkGreeting "doei" ; 
  GCheers = mkGreeting "proost" ;
  GDamn = mkGreeting "verdomme" ; 
  GExcuse, GExcusePol = mkGreeting "pardon" ; 
  GGoodDay = mkGreeting "goedendag" ;
  GGoodEvening = mkGreeting "goedenavond" ;
  GGoodMorning = mkGreeting "goedemorgen" ;
  GGoodNight = mkGreeting "goedenacht" ;
  GGoodbye = mkGreeting "tot ziens" ;
  GHello = mkGreeting "hallo" ;
  GHelp = mkGreeting "help" ;
  GHowAreYou = mkGreeting "hoe gaat het" ;
  GLookOut = mkGreeting "kijk uit" ;
  GNiceToMeetYou = mkGreeting "leuk je te ontmoeten" ;
  GNiceToMeetYouPol = mkGreeting "leuk je u ontmoeten" ;
  GPleaseGive, GPleaseGivePol = mkGreeting "alstublieft" ; 
  GSeeYouSoon = mkGreeting "tot ziens" ;
  GSorry = mkGreeting "sorry";
  GSorryPol = mkGreeting "mijn verontschuldiging" ;
  GThanks = mkGreeting "dank je wel" ; 
  GTheCheck = mkGreeting "rekening" ; 
  GCongratulations = mkGreeting "gefeliciteerd";
  GHappyBirthday = mkGreeting "gelukkige verjaardag" ;
  GGoodLuck = mkGreeting "veel geluk" ; 
  GWhatTime = mkGreeting "hoe laat is het" ;
}