DZNRM2

Purpose

DZNRM2 returns the euclidean norm of a vector via the function
name, so that

DZNRM2 := sqrt( x**H*x )

Modified on 14-October-1993 to inline the call to ZLASSQ.
Sven Hammarling, Nag Ltd.