1 2 3 4 5
--# -path=.:present:prelude concrete MusicFin of Music = MusicI with (Grammar = GrammarFin), (MusicLex = MusicLexFin) ;