# is even?; iseven(cos(x)):=true; iseven(cosh(x)):=true; iseven(x^n_):=If(iseven(n), true, false); iseven(x):=fales;