--# -path=.:present:prelude

concrete PeaceKeep_Eng of PeaceKeep = CatEng, PeaceLex_Eng ** PeaceKeepI with
  (Lang = LangEng) ;