Functions/Subroutines

BLAS/TESTING/cblat2.f File Reference

Go to the source code of this file.

Functions/Subroutines

program CBLAT2
subroutine CCHK1 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G)
subroutine CCHK2 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G)
subroutine CCHK3 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, XT, G, Z)
subroutine CCHK4 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G, Z)
subroutine CCHK5 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G, Z)
subroutine CCHK6 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G, Z)
subroutine CCHKE (ISNUM, SRNAMT, NOUT)
subroutine CMAKE (TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, KL, KU, RESET, TRANSL)
subroutine CMVCH (TRANS, M, N, ALPHA, A, NMAX, X, INCX, BETA, Y, INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV)
LOGICAL LCE (RI, RJ, LR)
LOGICAL LCERES (TYPE, UPLO, M, N, AA, AS, LDA)
COMPLEX CBEG (RESET)
REAL SDIFF (X, Y)
subroutine CHKXER (SRNAMT, INFOT, NOUT, LERR, OK)
subroutine XERBLA (SRNAME, INFO)

Function Documentation

COMPLEX CBEG ( LOGICAL  RESET )

Definition at line 3096 of file cblat2.f.

program CBLAT2 (  )

Definition at line 1 of file cblat2.f.

subroutine CCHK1 ( CHARACTER*6  SNAME,
REAL  EPS,
REAL  THRESH,
INTEGER  NOUT,
INTEGER  NTRA,
LOGICAL  TRACE,
LOGICAL  REWI,
LOGICAL  FATAL,
INTEGER  NIDIM,
INTEGER,dimension( nidim )  IDIM,
INTEGER  NKB,
INTEGER,dimension( nkb )  KB,
INTEGER  NALF,
COMPLEX,dimension( nalf )  ALF,
INTEGER  NBET,
COMPLEX,dimension( nbet )  BET,
INTEGER  NINC,
INTEGER,dimension( ninc )  INC,
INTEGER  NMAX,
INTEGER  INCMAX,
COMPLEX,dimension( nmax, nmax )  A,
COMPLEX,dimension( nmax*nmax )  AA,
COMPLEX,dimension( nmax*nmax )  AS,
COMPLEX,dimension( nmax )  X,
COMPLEX,dimension( nmax*incmax )  XX,
COMPLEX,dimension( nmax*incmax )  XS,
COMPLEX,dimension( nmax )  Y,
COMPLEX,dimension( nmax*incmax )  YY,
COMPLEX,dimension( nmax*incmax )  YS,
COMPLEX,dimension( nmax )  YT,
REAL,dimension( nmax )  G 
)

Definition at line 402 of file cblat2.f.

subroutine CCHK2 ( CHARACTER*6  SNAME,
REAL  EPS,
REAL  THRESH,
INTEGER  NOUT,
INTEGER  NTRA,
LOGICAL  TRACE,
LOGICAL  REWI,
LOGICAL  FATAL,
INTEGER  NIDIM,
INTEGER,dimension( nidim )  IDIM,
INTEGER  NKB,
INTEGER,dimension( nkb )  KB,
INTEGER  NALF,
COMPLEX,dimension( nalf )  ALF,
INTEGER  NBET,
COMPLEX,dimension( nbet )  BET,
INTEGER  NINC,
INTEGER,dimension( ninc )  INC,
INTEGER  NMAX,
INTEGER  INCMAX,
COMPLEX,dimension( nmax, nmax )  A,
COMPLEX,dimension( nmax*nmax )  AA,
COMPLEX,dimension( nmax*nmax )  AS,
COMPLEX,dimension( nmax )  X,
COMPLEX,dimension( nmax*incmax )  XX,
COMPLEX,dimension( nmax*incmax )  XS,
COMPLEX,dimension( nmax )  Y,
COMPLEX,dimension( nmax*incmax )  YY,
COMPLEX,dimension( nmax*incmax )  YS,
COMPLEX,dimension( nmax )  YT,
REAL,dimension( nmax )  G 
)

Definition at line 747 of file cblat2.f.

subroutine CCHK3 ( CHARACTER*6  SNAME,
REAL  EPS,
REAL  THRESH,
INTEGER  NOUT,
INTEGER  NTRA,
LOGICAL  TRACE,
LOGICAL  REWI,
LOGICAL  FATAL,
INTEGER  NIDIM,
INTEGER,dimension( nidim )  IDIM,
INTEGER  NKB,
INTEGER,dimension( nkb )  KB,
INTEGER  NINC,
INTEGER,dimension( ninc )  INC,
INTEGER  NMAX,
INTEGER  INCMAX,
COMPLEX,dimension( nmax, nmax )  A,
COMPLEX,dimension( nmax*nmax )  AA,
COMPLEX,dimension( nmax*nmax )  AS,
COMPLEX,dimension( nmax )  X,
COMPLEX,dimension( nmax*incmax )  XX,
COMPLEX,dimension( nmax*incmax )  XS,
COMPLEX,dimension( nmax )  XT,
REAL,dimension( nmax )  G,
COMPLEX,dimension( nmax )  Z 
)

Definition at line 1095 of file cblat2.f.

subroutine CCHK4 ( CHARACTER*6  SNAME,
REAL  EPS,
REAL  THRESH,
INTEGER  NOUT,
INTEGER  NTRA,
LOGICAL  TRACE,
LOGICAL  REWI,
LOGICAL  FATAL,
INTEGER  NIDIM,
INTEGER,dimension( nidim )  IDIM,
INTEGER  NALF,
COMPLEX,dimension( nalf )  ALF,
INTEGER  NINC,
INTEGER,dimension( ninc )  INC,
INTEGER  NMAX,
INTEGER  INCMAX,
COMPLEX,dimension( nmax, nmax )  A,
COMPLEX,dimension( nmax*nmax )  AA,
COMPLEX,dimension( nmax*nmax )  AS,
COMPLEX,dimension( nmax )  X,
COMPLEX,dimension( nmax*incmax )  XX,
COMPLEX,dimension( nmax*incmax )  XS,
COMPLEX,dimension( nmax )  Y,
COMPLEX,dimension( nmax*incmax )  YY,
COMPLEX,dimension( nmax*incmax )  YS,
COMPLEX,dimension( nmax )  YT,
REAL,dimension( nmax )  G,
COMPLEX,dimension( nmax )  Z 
)

Definition at line 1456 of file cblat2.f.

subroutine CCHK5 ( CHARACTER*6  SNAME,
REAL  EPS,
REAL  THRESH,
INTEGER  NOUT,
INTEGER  NTRA,
LOGICAL  TRACE,
LOGICAL  REWI,
LOGICAL  FATAL,
INTEGER  NIDIM,
INTEGER,dimension( nidim )  IDIM,
INTEGER  NALF,
COMPLEX,dimension( nalf )  ALF,
INTEGER  NINC,
INTEGER,dimension( ninc )  INC,
INTEGER  NMAX,
INTEGER  INCMAX,
COMPLEX,dimension( nmax, nmax )  A,
COMPLEX,dimension( nmax*nmax )  AA,
COMPLEX,dimension( nmax*nmax )  AS,
COMPLEX,dimension( nmax )  X,
COMPLEX,dimension( nmax*incmax )  XX,
COMPLEX,dimension( nmax*incmax )  XS,
COMPLEX,dimension( nmax )  Y,
COMPLEX,dimension( nmax*incmax )  YY,
COMPLEX,dimension( nmax*incmax )  YS,
COMPLEX,dimension( nmax )  YT,
REAL,dimension( nmax )  G,
COMPLEX,dimension( nmax )  Z 
)

Definition at line 1733 of file cblat2.f.

subroutine CCHK6 ( CHARACTER*6  SNAME,
REAL  EPS,
REAL  THRESH,
INTEGER  NOUT,
INTEGER  NTRA,
LOGICAL  TRACE,
LOGICAL  REWI,
LOGICAL  FATAL,
INTEGER  NIDIM,
INTEGER,dimension( nidim )  IDIM,
INTEGER  NALF,
COMPLEX,dimension( nalf )  ALF,
INTEGER  NINC,
INTEGER,dimension( ninc )  INC,
INTEGER  NMAX,
INTEGER  INCMAX,
COMPLEX,dimension( nmax, nmax )  A,
COMPLEX,dimension( nmax*nmax )  AA,
COMPLEX,dimension( nmax*nmax )  AS,
COMPLEX,dimension( nmax )  X,
COMPLEX,dimension( nmax*incmax )  XX,
COMPLEX,dimension( nmax*incmax )  XS,
COMPLEX,dimension( nmax )  Y,
COMPLEX,dimension( nmax*incmax )  YY,
COMPLEX,dimension( nmax*incmax )  YS,
COMPLEX,dimension( nmax )  YT,
REAL,dimension( nmax )  G,
COMPLEX,dimension( nmax, 2 )  Z 
)

Definition at line 2017 of file cblat2.f.

subroutine CCHKE ( INTEGER  ISNUM,
CHARACTER*6  SRNAMT,
INTEGER  NOUT 
)

Definition at line 2339 of file cblat2.f.

subroutine CHKXER ( CHARACTER*6  SRNAMT,
INTEGER  INFOT,
INTEGER  NOUT,
LOGICAL  LERR,
LOGICAL  OK 
)

Definition at line 3164 of file cblat2.f.

subroutine CMAKE ( CHARACTER*2  TYPE,
CHARACTER*1  UPLO,
CHARACTER*1  DIAG,
INTEGER  M,
INTEGER  N,
COMPLEX,dimension( nmax, * )  A,
INTEGER  NMAX,
COMPLEX,dimension( * )  AA,
INTEGER  LDA,
INTEGER  KL,
INTEGER  KU,
LOGICAL  RESET,
COMPLEX  TRANSL 
)

Definition at line 2682 of file cblat2.f.

subroutine CMVCH ( CHARACTER*1  TRANS,
INTEGER  M,
INTEGER  N,
COMPLEX  ALPHA,
COMPLEX,dimension( nmax, * )  A,
INTEGER  NMAX,
COMPLEX,dimension( * )  X,
INTEGER  INCX,
COMPLEX  BETA,
COMPLEX,dimension( * )  Y,
INTEGER  INCY,
COMPLEX,dimension( * )  YT,
REAL,dimension( * )  G,
COMPLEX,dimension( * )  YY,
REAL  EPS,
REAL  ERR,
LOGICAL  FATAL,
INTEGER  NOUT,
LOGICAL  MV 
)

Definition at line 2874 of file cblat2.f.

LOGICAL LCE ( COMPLEX,dimension( * )  RI,
COMPLEX,dimension( * )  RJ,
INTEGER  LR 
)

Definition at line 3006 of file cblat2.f.

LOGICAL LCERES ( CHARACTER*2  TYPE,
CHARACTER*1  UPLO,
INTEGER  M,
INTEGER  N,
COMPLEX,dimension( lda, * )  AA,
COMPLEX,dimension( lda, * )  AS,
INTEGER  LDA 
)

Definition at line 3036 of file cblat2.f.

REAL SDIFF ( REAL  X,
REAL  Y 
)

Definition at line 3148 of file cblat2.f.

subroutine XERBLA ( CHARACTER*6  SRNAME,
INTEGER  INFO 
)

Definition at line 3192 of file cblat2.f.