--# -path=.:../finnish/:../abstract:../common:prelude

concrete DemonstrativeFin of Demonstrative = CatFin ** DemonstrativeI with
  (Lang = LangFin) ;