Fear my λ-calculus

(define (% x y)
    (if (< x y)
    x
    (% (- x y) y)
    )
)

(define (floor x)
    (- x (% x 1) )
)

(floor (/ (floor (/ minutes 60)) 24))
(% (floor (/ minute 60)) 24)
(% minute 60)

YOU FUCKING SUCK AT LISP GET THE FUCK OUT

>>1
(define % modulo)
(define floor floor)

>>3

Don't change these.

Name:		Email:
Entire Thread Thread List