Esta es mi función para el curry:

(define (curry g)
  (lambda(x)
    (lambda(y)
      (g x y))))

Estoy tratando de producir una lista de números no iguales a 1 usando la función curry.

Lo que tengo hasta ahora es:

(define filter-numbers ((curry filter)
                       ((curry equal?) 1)))

Pero solo produce la lista de números igual a 1.

ex. (números de filtro (lista 1 2 3)) -> (lista 1)

Quiero obtener (lista 2 3) pero no tengo idea de cómo. ¿Alguien puede ayudar?