signature wordspp = sig val words_printer : term_grammar.userprinter val words_cast_printer : term_grammar.userprinter end
HOL 4, Kananaskis-14