remove_type_abbrev : string -> unit
# new_type_abbrev("btriple",`:bool#bool#bool`);; val it : unit = () # type_abbrevs();; val it : (string * hol_type) list = [("btriple", `:bool#bool#bool`)]
# remove_type_abbrev "btriple";; val it : unit = () # type_abbrevs();; val it : (string * hol_type) list = []