--# -path=.:present:prelude

concrete PeaceCat_Eng of PeaceCat = PeaceCatI with (Lang = LangEng);