updated scheme tests

homework/hw1/scheme-hw-tests.rkt

@@ -43,7 +43,7 @@
       (check-equal? (reduce (lambda (sum each) (+ sum each)) '(1 2 3 4) 0) 10)
       (check-equal?
          (reduce (lambda (squares each) (cons (* each each) squares)) '(1 2 3) '())
-         '(9 4 1)) )) ))
+         '(1 4 9)) )) ))
 
 (require rackunit/gui)
 (test/gui hw-tests)