(* Substant.sml * Copyright 1996 Peter Sestoft.  
   Må kopieres og modificeres jvfr. GNU General Public License *)

local 
    open Basis
in
    val vaelg : (bestemthed * numerus) option -> 
                (bestemthed * numerus) * genus * ordsek * bool
    val possesiv : ordsek -> ordsek
end