instance LexiconFin of Lexicon = open StructuralFin, ParadigmsFin in {

  oper
    play = tvDir (vKattaa "soittaa" "soitan") ;
    song = nRae "kappale" "kappaleena" ;

    yesterday = UsePN (mkPN (nPuu "Yesterday")) ;

}