TFL/mask.sig

Replaced Konrad's own add_term_names by the predefined one.
Replaced fn Free x => x by dest_Free.

signature Mask_sig =
sig
 datatype 'a binding = |-> of ('a * 'a)  (* infix 7 |->; *)

 type mask
 val ERR : mask

end