6/12/72                                               HYPOT (III)





NAME            hypot -- calculate hypotenuse



SYNOPSIS        (A in fr0)

                (B in fr0)

                jsr     r5,hypot



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.



                The floating point simulator should be active in

                either single or double mode.



FILES           kept in /usr/lib/liba.a



SEE ALSO        fptrap(III)



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

                sented.



BUGS            --



OWNER           ken, dmr