Previous: utde2 Up: ../plot79_u.html Next: utdpcp

UTDE3

       DOUBLE PRECISION FUNCTION  UTDE3 (VX,VY,VZ)
 C$    (Euclidean Norm of 3-Vector)
 C$    Return as a function value the Euclidean norm of the DOUBLE
 C$    PRECISION 3-vector,  (VX,VY,VZ).   This  is  equivalent  to
 C$    DSQRT(VX**2 + VY**2  +  VZ**2),  but  this  expression  can
 C$    overflow or underflow over roughly half the range of DOUBLE
 C$    PRECISION numbers.  The algorithm  used is stable over  the
 C$    entire range.
 C$    (06-APR-83)