rm
Original test:
(lambda ((a default) (b default) (c default) (d default)) #:name "(- (hypot (sqrt (atan a)) b) (* c a))" (- (hypot (sqrt (atan a)) b) (* c a)))