let
is_even_non_zero =
function
TTNZ
_
->
true
|
_
->
false