--# -path=.:present:prelude concrete SwadeshFre of Swadesh = CatFre ** SwadeshI with (Lang = LangFre) ;