rm
Original test:
(lambda ((a default) (b default)) #:name "NMSE Section 6.1 mentioned, B" (* (* (/ PI 2) (/ 1 (- (sqr b) (sqr a)))) (- (/ 1 a) (/ 1 b))))