--# -path=.:present:prelude

concrete PeaceLexCommon_Eng of PeaceLexCommon = 
  PeaceCat_Eng ** PeaceLexCommonI with (Lang = LangEng), 
  (Constructors = ConstructorsEng) ;