new_definition : term -> thm
|- !x_1 ... x_m. c v_1 ... v_n = t
# new_definition
`NAND2 (in_1,in_2) out <=> !t:num. out t <=> ~(in_1 t /\ in_2 t)`;;
val it : thm =
|- !out in_1 in_2.
NAND2 (in_1,in_2) out <=> (!t. out t <=> ~(in_1 t /\ in_2 t))