module Inductive; type T := t : T; end ;