# is even?;

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