concrete GreetingsIta of Greetings = open Prelude in {

lincat 
  Greeting = SS ;

lin 
  GHello = ss "ciao" ;
  GThanks = ss "grazie" ;
  GHowAreYou = ss "come sta" ;
  GPleaseGive, GPleaseGivePol = ss "per favore" ;
  GExcuse = ss "scusa" ;
  GExcusePol = ss "scusi" ;
  GSorry = ss "scusami" ; ----
  GSorryPol = ss "scusimi" ; ----
  GGoodbye = ss "arrivederci" ;
  GBye = ss "ciao" ;
  GWhatsYourName = ss "come ti chiami" ;
  GWhatsYourNamePol = ss "come si chiama" ;
--  GNiceToMeetYou = ss "piacevole" ; ----
--  GSeeYouSoon = ss "a poco tempo" ; ----
  GHelp = ss "aiuto" ;
  GLookOut = ss "attenzione" ;
  GGoodMorning = ss "buongiorno" ;
  GGoodDay = ss "buongiorno" ;
  GGoodEvening = ss "buona sera" ;
  GGoodNight = ss "buona notte" ;
  GTheCheck = ss "il conto" ;

  GYes = ss "sė" ;
  GNo = ss "no" ;


}