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

concrete PeaceSpoken_Eng of PeaceSpoken = 
  Peace_Eng ** {

  flags startcat = PhraseSpoken ; 

}