HALP

(define (square x) (* x x))
(define (sum-of-squares x y) (+ (square x) (square y)))
(define (>= x y) (or (> x y) (= x y)))
(define (largest x y z) ( cond ((and (>= x y) (>= x z)) x)
                               ((and (>= y x) (>= y z)) y)
                               ((and (>= z x) (>= z y)) z)))
(define (largest2 x) (cond ((and (>= (car x) (car (cdr x)) )) (car x))
                             (else (car (cdr x)))))
(define (sum-of-largest-squares x y z) (sum-of-squares
                                         (largest x y z)
                                         (largest2
                                           (filter
                                             (lambda (v) (not (= v (largest x y z))))
                                             '(x y z))))

ur a faggot stop using that shitfucking lang


(define (>= x y) (or (> x y) (= x y)))
lel. use newLISP, ``faggot''

Largest shouldn't return x when x=y=z

>>3
NO THANK YOU!

>>4
Obviously. It should return y.