Scheme / Dr Racket - año bisiesto

Enunciado: Escribir en scheme un programa que tome como entrada un número que representa un año (entrada). La función debe calcular si el año es bisiesto y retornar el símbolo: año bisiesto. Si el año no es bisiesto entonces la función debe retornar el símbolo:    'año_NO_bisiesto 

Nota: Podemos decir que un año es bisiesto si es múltiplo de 4, excepto
aquellos años que son múltiplos de 100. En el caso en que el año es
múltiplo de 100, decimos es bisiesto si es múltiplo de 400. Ejemplo: si la
entrada es el año 1900 (múltiplo de 100), la salida es 'año_NO_bisiesto
dado que no es múltiplo de 400. 

Si la estrada es el 2004, la salida es 'año_bisiesto porque es múltiplo de 4.
Si la estrada es el 2000, la salida es 'año_bisiesto porque es múltiplo de
400.

; ==========================================================
(define (añoB año)
  (cond
    [(and (= (remainder año 4) 0) (or (not (= (remainder año 100) 0)) (= (remainder año 400) 0) )) 'año_bisiesto ]
    [else 'año_no_bisiesto ]
    )
  )

;prueba
(añoB 2004)
(añoB 2005)
; ==========================================================