get_sort: minimize sorts given in the text, while keeping those from the context unchanged (the latter are preferred);
tuned;
header {* Plain HOL *}
theory Plain
imports Datatype Record FunDef Extraction
begin
text {*
Plain bootstrap of fundamental HOL tools and packages; does not
include @{text Hilbert_Choice}.
*}
ML {* path_add "~~/src/HOL/Library" *}
end