concrete GreetingsEng of Greetings = open Prelude in {

lincat 
  Greeting, Politeness = SS ;

lin 
  GHello = ss "hello" ;
  GThanks = ss "thank you" ;
  GHowAreYou = ss "how are you" ;
  GPleaseGive = ss "please" ;
  GExcuse = ss "excuse me" ;
  GSorry = ss "sorry" ;
  GGoodbye = ss "goodbye" ;
  GBye = ss "bye" ;
  GWhatsYourName = ss "what's your name" ;
  GNiceToMeetYou = ss "nice to meet you" ;
  GSeeYouSoon = ss "see you soon" ;
  GHelp = ss "help" ;
  GLookOut = ss "look out" ;
  GGoodMorning = ss "good morning" ;
  GGoodDay = ss "good afternoon" ; ----
  GGoodEvening = ss "good evening" ;
  GGoodNight = ss "good night" ;
  GImHungry = ss "I'm hungry" ;
  GImThirsty = ss "I'm thirsty" ;
  GImTired = ss "I'm tired" ;
  GImScared = ss "I'm scared" ;
  GIdontUnderstand = ss "I don't understand" ;
  GWheresTheBathroom = ss "where's the bathroom" ;
  GTheCheck = ss "the bill" ;

  GYes = ss "yes" ;
  GNo = ss "no" ;


}