HYPOT (III)                  6/12/72                  HYPOT (III)





NAME            hypot -- calculate hypotenuse



SYNOPSIS        movf    a,fr0

                movf    b,fr1

                jsr     r5,hypot

                movf    fr0,...



DESCRIPTION     The square root of fr0*fr0 + fr1*fr1 is returned

                in fr0.  The calculation is done in such a way

                that overflow will not occur unless the answer is

                not representable in floating point.



FILES           kept in /lib/liba.a



SEE ALSO        sqrt(III)



DIAGNOSTICS     The c-bit is set if the result cannot be repre-

                sented.



BUGS            --