Original test:
(lambda ((a default) (b default) (c default)) #:name "(- (/ a (cotan c)) (hypot b b))" (- (/ a (cotan c)) (hypot b b)))