OB.DAAC Logo
NASA Logo
Ocean Color Science Software

ocssw V2022
lpq.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine zgetf2 (M, N, A, LDA, IPIV, INFO)
 
subroutine zgetrf (M, N, A, LDA, IPIV, INFO)
 
subroutine zlaswp (N, A, LDA, K1, K2, IPIV, INCX)
 
integer function ieeeck (ISPEC, ZERO, ONE)
 
integer function ilaenv (ISPEC, NAME, OPTS, N1, N2, N3, N4)
 
subroutine xerbla (SRNAME, INFO)
 
subroutine zgetri (N, A, LDA, IPIV, WORK, LWORK, INFO)
 
subroutine ztrti2 (UPLO, DIAG, N, A, LDA, INFO)
 
subroutine ztrtri (UPLO, DIAG, N, A, LDA, INFO)
 
logical function lsame (CA, CB)
 
integer function izamax (n, zx, incx)
 
real *16 function dcabs1 (z)
 
subroutine zswap (n, zx, incx, zy, incy)
 
subroutine zscal (n, za, zx, incx)
 
subroutine zgeru (M, N, ALPHA, X, INCX, Y, INCY, A, LDA)
 
subroutine ztrsm (SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA, A, LDA, B, LDB)
 
subroutine zgemm (TRANSA, TRANSB, M, N, K, ALPHA, A, LDA, B, LDB, BETA, C, LDC)
 
subroutine ztrmv (UPLO, TRANS, DIAG, N, A, LDA, X, INCX)
 
subroutine ztrmm (SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA, A, LDA, B, LDB)
 
subroutine zgemv (TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY)
 

Function/Subroutine Documentation

◆ dcabs1()

real*16 function dcabs1 ( complex*32  z)

Definition at line 883 of file lpq.f.

◆ ieeeck()

integer function ieeeck ( integer  ISPEC,
real  ZERO,
real  ONE 
)

Definition at line 157 of file lpq.f.

◆ ilaenv()

integer function ilaenv ( integer  ISPEC,
character*( * )  NAME,
character*( * )  OPTS,
integer  N1,
integer  N2,
integer  N3,
integer  N4 
)

Definition at line 239 of file lpq.f.

◆ izamax()

integer function izamax ( integer  n,
complex*32, dimension(*)  zx,
integer  incx 
)

Definition at line 854 of file lpq.f.

◆ lsame()

logical function lsame ( character  CA,
character  CB 
)

Definition at line 827 of file lpq.f.

◆ xerbla()

subroutine xerbla ( character*6  SRNAME,
integer  INFO 
)

Definition at line 603 of file lpq.f.

◆ zgemm()

subroutine zgemm ( character*1  TRANSA,
character*1  TRANSB,
integer  M,
integer  N,
integer  K,
complex*32  ALPHA,
complex*32, dimension( lda, * )  A,
integer  LDA,
complex*32, dimension( ldb, * )  B,
integer  LDB,
complex*32  BETA,
complex*32, dimension( ldc, * )  C,
integer  LDC 
)

Definition at line 1254 of file lpq.f.

◆ zgemv()

subroutine zgemv ( character*1  TRANS,
integer  M,
integer  N,
complex*32  ALPHA,
complex*32, dimension( lda, * )  A,
integer  LDA,
complex*32, dimension( * )  X,
integer  INCX,
complex*32  BETA,
complex*32, dimension( * )  Y,
integer  INCY 
)

Definition at line 1921 of file lpq.f.

◆ zgeru()

subroutine zgeru ( integer  M,
integer  N,
complex*32  ALPHA,
complex*32, dimension( * )  X,
integer  INCX,
complex*32, dimension( * )  Y,
integer  INCY,
complex*32, dimension( lda, * )  A,
integer  LDA 
)

Definition at line 934 of file lpq.f.

◆ zgetf2()

subroutine zgetf2 ( integer  M,
integer  N,
complex*32, dimension( lda, * )  A,
integer  LDA,
integer, dimension( * )  IPIV,
integer  INFO 
)

Definition at line 2 of file lpq.f.

◆ zgetrf()

subroutine zgetrf ( integer  M,
integer  N,
complex*32, dimension( lda, * )  A,
integer  LDA,
integer, dimension( * )  IPIV,
integer  INFO 
)

Definition at line 47 of file lpq.f.

◆ zgetri()

subroutine zgetri ( integer  N,
complex*32, dimension( lda, * )  A,
integer  LDA,
integer, dimension( * )  IPIV,
complex*32, dimension( * )  WORK,
integer  LWORK,
integer  INFO 
)

Definition at line 612 of file lpq.f.

◆ zlaswp()

subroutine zlaswp ( integer  N,
complex*32, dimension( lda, * )  A,
integer  LDA,
integer  K1,
integer  K2,
integer, dimension( * )  IPIV,
integer  INCX 
)

Definition at line 103 of file lpq.f.

◆ zscal()

subroutine zscal ( integer  n,
complex*32  za,
complex*32, dimension(*)  zx,
integer  incx 
)

Definition at line 917 of file lpq.f.

◆ zswap()

subroutine zswap ( integer  n,
complex*32, dimension(*)  zx,
integer  incx,
complex*32, dimension(*)  zy,
integer  incy 
)

Definition at line 892 of file lpq.f.

◆ ztrmm()

subroutine ztrmm ( character*1  SIDE,
character*1  UPLO,
character*1  TRANSA,
character*1  DIAG,
integer  M,
integer  N,
complex*32  ALPHA,
complex*32, dimension( lda, * )  A,
integer  LDA,
complex*32, dimension( ldb, * )  B,
integer  LDB 
)

Definition at line 1684 of file lpq.f.

◆ ztrmv()

subroutine ztrmv ( character*1  UPLO,
character*1  TRANS,
character*1  DIAG,
integer  N,
complex*32, dimension( lda, * )  A,
integer  LDA,
complex*32, dimension( * )  X,
integer  INCX 
)

Definition at line 1488 of file lpq.f.

◆ ztrsm()

subroutine ztrsm ( character*1  SIDE,
character*1  UPLO,
character*1  TRANSA,
character*1  DIAG,
integer  M,
integer  N,
complex*32  ALPHA,
complex*32, dimension( lda, * )  A,
integer  LDA,
complex*32, dimension( ldb, * )  B,
integer  LDB 
)

Definition at line 999 of file lpq.f.

◆ ztrti2()

subroutine ztrti2 ( character  UPLO,
character  DIAG,
integer  N,
complex*32, dimension( lda, * )  A,
integer  LDA,
integer  INFO 
)

Definition at line 697 of file lpq.f.

◆ ztrtri()

subroutine ztrtri ( character  UPLO,
character  DIAG,
integer  N,
complex*32, dimension( lda, * )  A,
integer  LDA,
integer  INFO 
)

Definition at line 756 of file lpq.f.