A Portable Fortran Program to Find the Euclidean Norm of a Vector
James L. Blue · ACM Transactions on Mathematical Software · 1978
A successful portable version of a Fortran subprogram to find the Euclidean norm of an n-vector, I] x II = (~-~.~-1x,2) 11~, is described.Overflow and underflow are avoided.A program implementing the algorithm is included.Key Words and Phrases: error bounds, Euclidean norm, machine constants, overflow, portability, underflow CR Categories: 5.11, 5.14 Then [I x I] = xma~ a 1/~.This procedure requires two passes over the data vector, which is unnecessarily slow, especially for long vectors on paged machines.(Tested General