<< Previous exercise (4.53) | Index | Next exercise (4.55) >>
meteorgan
(if (not (true? pred-value)) fail2 (succeed 'ok fail2))
simple
(if (not (true? pred-value)) (fail2) (succeed 'ok fail2))
(if (not (true? pred-value)) fail2 (succeed 'ok fail2))simple
(if (not (true? pred-value)) (fail2) (succeed 'ok fail2))