1;;> Utility to determine the length of the hypotenuse of a right 2;;> triangle given the other two sides. 3 4(define-library (pythagoras hypotenuse) 5 (export hypotenuse) 6 (include-shared "hypotenuse")) 7