--# -path=.:..:present:prelude

concrete PeaceSpoken_Swe of PeaceSpoken = 
  Peace_Swe ** {

  flags startcat = PhraseSpoken ; 

}