norm2(3f) - [FORTRAN:INTRINSIC:MATHEMATICS] Euclidean vector norm
result = norm2(array[, dim])
Calculates the Euclidean vector norm (L_2 norm) of ARRAY along dimension DIM.
ARRAY Shall be an array of type REAL. DIM (Optional) shall be a scalar of type INTEGER with a value in the range from 1 to n, where n equals the rank of ARRAY.
The result is of the same type as ARRAY.If DIM is absent, a scalar with the square root of the sum of squares of the elements of ARRAY is returned. Otherwise, an array of rank n-1, where "n" equals the rank of ARRAY, and a shape similar to that of ARRAY with dimension DIM dropped is returned.
Sample program:
program demo_norm2 implicit none real :: x(5) = [ real :: 1, 2, 3, 4, 5 ] print *, norm2(x) ! = sqrt(55.) ~ 7.416 end program demo_norm2
[[Fortran 2008]] and later
Transformational function
product(3), sum(3), hypot(3)
norm2 (3) | March 11, 2021 |