is-eq-four

Returns true if the given number is 4, false otherwise.