concrete GreetingsCat of Greetings = open Prelude in {

--lincat 
--  Greeting = SS ;

--lin 
--  GBye = ss "ciao" ;
--  GCheers = ss "cincin" ;
--  GDamn = ss "maledizione" ;
--  GExcuse = ss "scusa" ;
--  GExcusePol = ss "scusi" ;
--  GGoodDay = ss "buongiorno" ;
--  GGoodEvening = ss "buona sera" ;
--  GGoodMorning = ss "buongiorno" ;
--  GGoodNight = ss "buona notte" ;
--  GGoodbye = ss "arrivederci" ;
--  GHello = ss "ciao" ;
--  GHelp = ss "aiuto" ;
--  GHowAreYou = ss "come sta" ;
--  GLookOut = ss "attenzione" ;
--  GNiceToMeetYou = ss "piacere di conoscerti" ;
--  GNiceToMeetYouPol = ss "piacere di conoscerLa" ;
--  GPleaseGive, GPleaseGivePol = ss "per favore" ;
--  GSeeYouSoon = ss "a presto" ; ----
--  GSorry = ss "scusami" ; ----
--  GSorryPol = ss "scusimi" ; ----
--  GThanks = ss "grazie" ;
--  GTheCheck = ss "il conto" ;

--}
}