BLAS/SRC/dznrm2.f90(3)

πŸ’… BLAS/SRC/dznrm2.f90(3) β€” Library Functions Manual

okay bestie, welcome to the dznrm2 page ✨ this is from the BLAS/SRC girlies, and honestly? she's a little icon. let's get into it πŸ’–


πŸŽ€ NAME πŸŽ€

BLAS/SRC/dznrm2.f90 β€” no cap, that's literally her whole name. she's the file, she's the function, she's the moment πŸ‘‘


🌸 SYNOPSIS 🌸

Functions/Subroutines

  • real(wp) function dznrm2 (n, x, incx) β€” bestie. this is the DZNRM2.

Function/Subroutine Documentation

real(wp) function dznrm2 (integer n, complex(wp), dimension(*) x, integer incx)

DZNRM2 πŸ’«

Purpose:

!>
!> DZNRM2 returns the euclidean norm of a vector via the function
!> name, so that
!>
!>    DZNRM2 := sqrt( x**H*x )
!>

so yeah, she returns the euclidean norm of a vector, fr fr β€” that formula up there is the whole vibe check 🧚


✨ Parameters ✨

  • N β€” N is INTEGER, and she's the number of elements in your input vector(s) πŸ“
!>          N is INTEGER
!>         number of elements in input vector(s)
!>
  • X β€” X is COMPLEX*16 array, dimension (N). a complex vector with N elements, that's her πŸ’œ
!>          X is COMPLEX*16 array, dimension (N)
!>         complex vector with N elements
!>
  • INCX β€” INCX is INTEGER, the storage spacing between elements of X. this one's important, pay attention bestie πŸ‘€
!>          INCX is INTEGER, storage spacing between elements of X
!>          If INCX > 0, X(1+(i-1)*INCX) = x(i) for 1 <= i <= n
!>          If INCX < 0, X(1-(n-i)*INCX) = x(i) for 1 <= i <= n
!>          If INCX = 0, x isn't a vector so there is no need to call
!>          this subroutine.  If you call it anyway, it will count x(1)
!>          in the vector norm N times.
!>
🫢 so like, if INCX is positive she strides forward, if it's negative she strides backward, and if it's 0… girl, x isn't a vector anymore, so there's literally no need to call this subroutine. and if you call it anyway? it will count x(1) in the vector norm N times. not a slay, but that's what it does πŸ’€

πŸ‘‘ Author πŸ‘‘

Edward Anderson, Lockheed Martin β€” the icon behind it all 🫑


🌈 Date 🌈

August 2016 β€” a vintage, lowkey πŸ“…


πŸ’– Contributors: πŸ’–

Weslley Pereira, University of Colorado Denver, USA πŸ‡ΊπŸ‡Έβœ¨


πŸ”₯ Further Details: πŸ”₯

!>
!>  Anderson E. (2017)
!>  Algorithm 978: Safe Scaling in the Level 1 BLAS
!>  ACM Trans Math Softw 44:1--28
!>  https://doi.org/10.1145/3061665
!>
!>  Blue, James L. (1978)
!>  A Portable Fortran Program to Find the Euclidean Norm of a Vector
!>  ACM Trans Math Softw 4:15--23
!>  https://doi.org/10.1145/355769.355771
!>
!>

like, the receipts are RIGHT there. she cites her sources, we stan an academically honest queen πŸ“šπŸ’…


Definition at line 89 of file dznrm2.f90 ⭐


⭐ Author ⭐

Generated automatically by Doxygen for LAPACK from the source code β€” so nobody hand-wrote this one, she was born this way πŸ§šβ€β™€οΈ


πŸŽ€ and that's the whole page bestie!! mwah πŸ’‹ this was LAPACK, Version 3.12.0, serving BLAS/SRC/dznrm2.f90(3) realness β€” see you in the next manpage, ily πŸ«ΆπŸ’œπŸŒΈ
πŸ“¦ where this page comes from