1 2 3 4 5 6 7
concrete MusicLexFin of MusicLex = CatFin ** open ParadigmsFin in { lin song_N = mkN "kappale" ; american_A = mkA "amerikkalainen" ; }