Write a function that reverses a list (without using the scheme reverse function).
reverse
(define (myreverse a) (if (null? a) () (append (myreverse (cdr a)) (list (car a)))))