--# -path=.:present:prelude

concrete SwadeshFin of Swadesh = CatFin ** SwadeshI with
  (Lang = LangFin) ;