Functions/Subroutines

BLAS/TESTING/dblat2.f File Reference

Go to the source code of this file.

Functions/Subroutines

program DBLAT2
subroutine DCHK1 (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 DCHK2 (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 DCHK3 (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 DCHK4 (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 DCHK5 (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 DCHK6 (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 DCHKE (ISNUM, SRNAMT, NOUT)
subroutine DMAKE (TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, KL, KU, RESET, TRANSL)
subroutine DMVCH (TRANS, M, N, ALPHA, A, NMAX, X, INCX, BETA, Y, INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV)
LOGICAL LDE (RI, RJ, LR)
LOGICAL LDERES (TYPE, UPLO, M, N, AA, AS, LDA)
DOUBLE PRECISION DBEG (RESET)
DOUBLE PRECISION DDIFF (X, Y)
subroutine CHKXER (SRNAMT, INFOT, NOUT, LERR, OK)
subroutine XERBLA (SRNAME, INFO)

Function Documentation

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

Definition at line 3061 of file dblat2.f.

DOUBLE PRECISION DBEG ( LOGICAL  RESET )

Definition at line 2999 of file dblat2.f.

program DBLAT2 (  )

Definition at line 1 of file dblat2.f.

subroutine DCHK1 ( CHARACTER*6  SNAME,
DOUBLE PRECISION  EPS,
DOUBLE PRECISION  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,
DOUBLE PRECISION,dimension( nalf )  ALF,
INTEGER  NBET,
DOUBLE PRECISION,dimension( nbet )  BET,
INTEGER  NINC,
INTEGER,dimension( ninc )  INC,
INTEGER  NMAX,
INTEGER  INCMAX,
DOUBLE PRECISION,dimension( nmax, nmax )  A,
DOUBLE PRECISION,dimension( nmax*nmax )  AA,
DOUBLE PRECISION,dimension( nmax*nmax )  AS,
DOUBLE PRECISION,dimension( nmax )  X,
DOUBLE PRECISION,dimension( nmax*incmax )  XX,
DOUBLE PRECISION,dimension( nmax*incmax )  XS,
DOUBLE PRECISION,dimension( nmax )  Y,
DOUBLE PRECISION,dimension( nmax*incmax )  YY,
DOUBLE PRECISION,dimension( nmax*incmax )  YS,
DOUBLE PRECISION,dimension( nmax )  YT,
DOUBLE PRECISION,dimension( nmax )  G 
)

Definition at line 395 of file dblat2.f.

subroutine DCHK2 ( CHARACTER*6  SNAME,
DOUBLE PRECISION  EPS,
DOUBLE PRECISION  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,
DOUBLE PRECISION,dimension( nalf )  ALF,
INTEGER  NBET,
DOUBLE PRECISION,dimension( nbet )  BET,
INTEGER  NINC,
INTEGER,dimension( ninc )  INC,
INTEGER  NMAX,
INTEGER  INCMAX,
DOUBLE PRECISION,dimension( nmax, nmax )  A,
DOUBLE PRECISION,dimension( nmax*nmax )  AA,
DOUBLE PRECISION,dimension( nmax*nmax )  AS,
DOUBLE PRECISION,dimension( nmax )  X,
DOUBLE PRECISION,dimension( nmax*incmax )  XX,
DOUBLE PRECISION,dimension( nmax*incmax )  XS,
DOUBLE PRECISION,dimension( nmax )  Y,
DOUBLE PRECISION,dimension( nmax*incmax )  YY,
DOUBLE PRECISION,dimension( nmax*incmax )  YS,
DOUBLE PRECISION,dimension( nmax )  YT,
DOUBLE PRECISION,dimension( nmax )  G 
)

Definition at line 736 of file dblat2.f.

subroutine DCHK3 ( CHARACTER*6  SNAME,
DOUBLE PRECISION  EPS,
DOUBLE PRECISION  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,
DOUBLE PRECISION,dimension( nmax, nmax )  A,
DOUBLE PRECISION,dimension( nmax*nmax )  AA,
DOUBLE PRECISION,dimension( nmax*nmax )  AS,
DOUBLE PRECISION,dimension( nmax )  X,
DOUBLE PRECISION,dimension( nmax*incmax )  XX,
DOUBLE PRECISION,dimension( nmax*incmax )  XS,
DOUBLE PRECISION,dimension( nmax )  XT,
DOUBLE PRECISION,dimension( nmax )  G,
DOUBLE PRECISION,dimension( nmax )  Z 
)

Definition at line 1079 of file dblat2.f.

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

Definition at line 1436 of file dblat2.f.

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

Definition at line 1697 of file dblat2.f.

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

Definition at line 1975 of file dblat2.f.

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

Definition at line 2290 of file dblat2.f.

DOUBLE PRECISION DDIFF ( DOUBLE PRECISION  X,
DOUBLE PRECISION  Y 
)

Definition at line 3045 of file dblat2.f.

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

Definition at line 2616 of file dblat2.f.

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

Definition at line 2792 of file dblat2.f.

LOGICAL LDE ( DOUBLE PRECISION,dimension( * )  RI,
DOUBLE PRECISION,dimension( * )  RJ,
INTEGER  LR 
)

Definition at line 2909 of file dblat2.f.

LOGICAL LDERES ( CHARACTER*2  TYPE,
CHARACTER*1  UPLO,
INTEGER  M,
INTEGER  N,
DOUBLE PRECISION,dimension( lda, * )  AA,
DOUBLE PRECISION,dimension( lda, * )  AS,
INTEGER  LDA 
)

Definition at line 2939 of file dblat2.f.

subroutine XERBLA ( CHARACTER*6  SRNAME,
INTEGER  INFO 
)

Definition at line 3089 of file dblat2.f.