Defines | Functions | Variables
sblat2.c File Reference
#include "f2c.h"
#include "blaswrap.h"
Include dependency graph for sblat2.c:

Go to the source code of this file.

Defines

#define infoc_1   (infoc_._1)
#define infoc_2   (infoc_._2)
#define srnamc_1   srnamc_

Functions

int chkxer_ (char *srnamt, integer *infot, integer *nout, logical *lerr, logical *ok)
logical lse_ (real *ri, real *rj, integer *lr)
logical lseres_ (char *type__, char *uplo, integer *m, integer *n, real *aa, real *as, integer *lda, ftnlen type_len, ftnlen uplo_len)
int MAIN__ (void)
doublereal sbeg_ (logical *reset)
int sblat2_ ()
int schk1_ (char *sname, real *eps, real *thresh, integer *nout, integer *ntra, logical *trace, logical *rewi, logical *fatal, integer *nidim, integer *idim, integer *nkb, integer *kb, integer *nalf, real *alf, integer *nbet, real *bet, integer *ninc, integer *inc, integer *nmax, integer *incmax, real *a, real *aa, real *as, real *x, real *xx, real *xs, real *y, real *yy, real *ys, real *yt, real *g, ftnlen sname_len)
int schk2_ (char *sname, real *eps, real *thresh, integer *nout, integer *ntra, logical *trace, logical *rewi, logical *fatal, integer *nidim, integer *idim, integer *nkb, integer *kb, integer *nalf, real *alf, integer *nbet, real *bet, integer *ninc, integer *inc, integer *nmax, integer *incmax, real *a, real *aa, real *as, real *x, real *xx, real *xs, real *y, real *yy, real *ys, real *yt, real *g, ftnlen sname_len)
int schk3_ (char *sname, real *eps, real *thresh, integer *nout, integer *ntra, logical *trace, logical *rewi, logical *fatal, integer *nidim, integer *idim, integer *nkb, integer *kb, integer *ninc, integer *inc, integer *nmax, integer *incmax, real *a, real *aa, real *as, real *x, real *xx, real *xs, real *xt, real *g, real *z__, ftnlen sname_len)
int schk4_ (char *sname, real *eps, real *thresh, integer *nout, integer *ntra, logical *trace, logical *rewi, logical *fatal, integer *nidim, integer *idim, integer *nalf, real *alf, integer *ninc, integer *inc, integer *nmax, integer *incmax, real *a, real *aa, real *as, real *x, real *xx, real *xs, real *y, real *yy, real *ys, real *yt, real *g, real *z__, ftnlen sname_len)
int schk5_ (char *sname, real *eps, real *thresh, integer *nout, integer *ntra, logical *trace, logical *rewi, logical *fatal, integer *nidim, integer *idim, integer *nalf, real *alf, integer *ninc, integer *inc, integer *nmax, integer *incmax, real *a, real *aa, real *as, real *x, real *xx, real *xs, real *y, real *yy, real *ys, real *yt, real *g, real *z__, ftnlen sname_len)
int schk6_ (char *sname, real *eps, real *thresh, integer *nout, integer *ntra, logical *trace, logical *rewi, logical *fatal, integer *nidim, integer *idim, integer *nalf, real *alf, integer *ninc, integer *inc, integer *nmax, integer *incmax, real *a, real *aa, real *as, real *x, real *xx, real *xs, real *y, real *yy, real *ys, real *yt, real *g, real *z__, ftnlen sname_len)
int schke_ (integer *isnum, char *srnamt, integer *nout, ftnlen srnamt_len)
doublereal sdiff_ (real *x, real *y)
int smake_ (char *type__, char *uplo, char *diag, integer *m, integer *n, real *a, integer *nmax, real *aa, integer *lda, integer *kl, integer *ku, logical *reset, real *transl, ftnlen type_len, ftnlen uplo_len, ftnlen diag_len)
int smvch_ (char *trans, integer *m, integer *n, real *alpha, real *a, integer *nmax, real *x, integer *incx, real *beta, real *y, integer *incy, real *yt, real *g, real *yy, real *eps, real *err, logical *fatal, integer *nout, logical *mv, ftnlen trans_len)
int xerbla_ (char *srname, integer *info)

Variables

static integer c__0 = 0
static integer c__1 = 1
static integer c__2 = 2
static integer c__3 = 3
static integer c__4 = 4
static integer c__65 = 65
static integer c__7 = 7
static integer c__8 = 8
static integer c__9 = 9
static real c_b121 = 1.f
static real c_b133 = 0.f
static logical c_false = FALSE_
static integer c_n1 = -1
static logical c_true = TRUE_
union {
   struct {
      integer   infot
      logical   lerr
      integer   noutc
      logical   ok
   }   _1
   struct {
      integer   infot
      logical   lerr
      integer   nout
      logical   ok
   }   _2
} infoc_
struct {
   char   srnamt [6]
} srnamc_

Define Documentation

#define infoc_1   (infoc_._1)

Definition at line 29 of file sblat2.c.

#define infoc_2   (infoc_._2)

Definition at line 30 of file sblat2.c.

#define srnamc_1   srnamc_

Definition at line 36 of file sblat2.c.

Function Documentation

int chkxer_ ( char *  srnamt,
integer *  infot,
integer *  nout,
logical *  lerr,
logical *  ok 
)

Definition at line 4895 of file sblat2.c.

logical lse_ ( real *  ri,
real *  rj,
integer *  lr 
)

Definition at line 4688 of file sblat2.c.

logical lseres_ ( char *  type__,
char *  uplo,
integer *  m,
integer *  n,
real *  aa,
real *  as,
integer *  lda,
ftnlen  type_len,
ftnlen  uplo_len 
)

Definition at line 4733 of file sblat2.c.

int MAIN__ ( void  )

Definition at line 55 of file sblat2.c.

doublereal sbeg_ ( logical *  reset)

Definition at line 4824 of file sblat2.c.

int sblat2_ ( )

Definition at line 5007 of file sblat2.c.

int schk1_ ( char *  sname,
real *  eps,
real *  thresh,
integer *  nout,
integer *  ntra,
logical *  trace,
logical *  rewi,
logical *  fatal,
integer *  nidim,
integer *  idim,
integer *  nkb,
integer *  kb,
integer *  nalf,
real *  alf,
integer *  nbet,
real *  bet,
integer *  ninc,
integer *  inc,
integer *  nmax,
integer *  incmax,
real *  a,
real *  aa,
real *  as,
real *  x,
real *  xx,
real *  xs,
real *  y,
real *  yy,
real *  ys,
real *  yt,
real *  g,
ftnlen  sname_len 
)

Definition at line 791 of file sblat2.c.

int schk2_ ( char *  sname,
real *  eps,
real *  thresh,
integer *  nout,
integer *  ntra,
logical *  trace,
logical *  rewi,
logical *  fatal,
integer *  nidim,
integer *  idim,
integer *  nkb,
integer *  kb,
integer *  nalf,
real *  alf,
integer *  nbet,
real *  bet,
integer *  ninc,
integer *  inc,
integer *  nmax,
integer *  incmax,
real *  a,
real *  aa,
real *  as,
real *  x,
real *  xx,
real *  xs,
real *  y,
real *  yy,
real *  ys,
real *  yt,
real *  g,
ftnlen  sname_len 
)

Definition at line 1335 of file sblat2.c.

int schk3_ ( char *  sname,
real *  eps,
real *  thresh,
integer *  nout,
integer *  ntra,
logical *  trace,
logical *  rewi,
logical *  fatal,
integer *  nidim,
integer *  idim,
integer *  nkb,
integer *  kb,
integer *  ninc,
integer *  inc,
integer *  nmax,
integer *  incmax,
real *  a,
real *  aa,
real *  as,
real *  x,
real *  xx,
real *  xs,
real *  xt,
real *  g,
real *  z__,
ftnlen  sname_len 
)

Definition at line 1896 of file sblat2.c.

int schk4_ ( char *  sname,
real *  eps,
real *  thresh,
integer *  nout,
integer *  ntra,
logical *  trace,
logical *  rewi,
logical *  fatal,
integer *  nidim,
integer *  idim,
integer *  nalf,
real *  alf,
integer *  ninc,
integer *  inc,
integer *  nmax,
integer *  incmax,
real *  a,
real *  aa,
real *  as,
real *  x,
real *  xx,
real *  xs,
real *  y,
real *  yy,
real *  ys,
real *  yt,
real *  g,
real *  z__,
ftnlen  sname_len 
)

Definition at line 2517 of file sblat2.c.

int schk5_ ( char *  sname,
real *  eps,
real *  thresh,
integer *  nout,
integer *  ntra,
logical *  trace,
logical *  rewi,
logical *  fatal,
integer *  nidim,
integer *  idim,
integer *  nalf,
real *  alf,
integer *  ninc,
integer *  inc,
integer *  nmax,
integer *  incmax,
real *  a,
real *  aa,
real *  as,
real *  x,
real *  xx,
real *  xs,
real *  y,
real *  yy,
real *  ys,
real *  yt,
real *  g,
real *  z__,
ftnlen  sname_len 
)

Definition at line 2925 of file sblat2.c.

int schk6_ ( char *  sname,
real *  eps,
real *  thresh,
integer *  nout,
integer *  ntra,
logical *  trace,
logical *  rewi,
logical *  fatal,
integer *  nidim,
integer *  idim,
integer *  nalf,
real *  alf,
integer *  ninc,
integer *  inc,
integer *  nmax,
integer *  incmax,
real *  a,
real *  aa,
real *  as,
real *  x,
real *  xx,
real *  xs,
real *  y,
real *  yy,
real *  ys,
real *  yt,
real *  g,
real *  z__,
ftnlen  sname_len 
)

Definition at line 3367 of file sblat2.c.

int schke_ ( integer *  isnum,
char *  srnamt,
integer *  nout,
ftnlen  srnamt_len 
)

Definition at line 3865 of file sblat2.c.

doublereal sdiff_ ( real *  x,
real *  y 
)

Definition at line 4875 of file sblat2.c.

int smake_ ( char *  type__,
char *  uplo,
char *  diag,
integer *  m,
integer *  n,
real *  a,
integer *  nmax,
real *  aa,
integer *  lda,
integer *  kl,
integer *  ku,
logical *  reset,
real *  transl,
ftnlen  type_len,
ftnlen  uplo_len,
ftnlen  diag_len 
)

Definition at line 4285 of file sblat2.c.

int smvch_ ( char *  trans,
integer *  m,
integer *  n,
real *  alpha,
real *  a,
integer *  nmax,
real *  x,
integer *  incx,
real *  beta,
real *  y,
integer *  incy,
real *  yt,
real *  g,
real *  yy,
real *  eps,
real *  err,
logical *  fatal,
integer *  nout,
logical *  mv,
ftnlen  trans_len 
)

Definition at line 4520 of file sblat2.c.

int xerbla_ ( char *  srname,
integer *  info 
)

Definition at line 4936 of file sblat2.c.

Variable Documentation

struct { ... } _1
struct { ... } _2
integer c__0 = 0 [static]

Definition at line 52 of file sblat2.c.

integer c__1 = 1 [static]

Definition at line 41 of file sblat2.c.

integer c__2 = 2 [static]

Definition at line 47 of file sblat2.c.

integer c__3 = 3 [static]

Definition at line 42 of file sblat2.c.

integer c__4 = 4 [static]

Definition at line 44 of file sblat2.c.

integer c__65 = 65 [static]

Definition at line 45 of file sblat2.c.

integer c__7 = 7 [static]

Definition at line 46 of file sblat2.c.

integer c__8 = 8 [static]

Definition at line 43 of file sblat2.c.

integer c__9 = 9 [static]

Definition at line 40 of file sblat2.c.

real c_b121 = 1.f [static]

Definition at line 48 of file sblat2.c.

real c_b133 = 0.f [static]

Definition at line 49 of file sblat2.c.

logical c_false = FALSE_ [static]

Definition at line 53 of file sblat2.c.

integer c_n1 = -1 [static]

Definition at line 51 of file sblat2.c.

logical c_true = TRUE_ [static]

Definition at line 50 of file sblat2.c.

union { ... } infoc_
integer infot

Definition at line 20 of file sblat2.c.

logical lerr

Definition at line 21 of file sblat2.c.

integer nout

Definition at line 24 of file sblat2.c.

integer noutc

Definition at line 20 of file sblat2.c.

logical ok

Definition at line 21 of file sblat2.c.

struct { ... } srnamc_
char srnamt[6]

Definition at line 33 of file sblat2.c.


swiftnav
Author(s):
autogenerated on Sat Jun 8 2019 18:56:55