; Simulates the primitive reverse function, which 
; reverses the order of the elements in a list

(define (newReverse x) (rev x '()))

(define (rev in out)
  (if (null? in) out
      (rev (cdr in) (cons (car in) out))
      ))