BETAS_CONV : conv
|- (\x1 ... xn. t[x1,...,xn]) s1 ... sn = t[s1,...,sn]
# BETAS_CONV `(\x y. x + y) 1 2`;; val it : thm = |- (\x y. x + y) 1 2 = 1 + 2