Functions | Variables
PLMD::blas Namespace Reference

Functions

double PLUMED_BLAS_F77_FUNC (dasum, DASUM)(int *n__
 
 if (n<=0||incx<=0)
 
 if (incx !=1)
 
 if (m !=0)
 
 for (i__=mp1;i__<=i__2;i__+=6)
 
void PLUMED_BLAS_F77_FUNC (daxpy, DAXPY)(int *n_arg
 
 if (n<=0) return
 
 if (incx!=1||incy!=1)
 
void PLUMED_BLAS_F77_FUNC (dcopy, DCOPY)(int *n__
 
double PLUMED_BLAS_F77_FUNC (ddot, DDOT)(int *n_arg
 
 for (i=0;i< m;i++) t1+
 
void PLUMED_BLAS_F77_FUNC (dgemm, DGEMM)(const char *transa
 
 if (tra=='N')
 
 if (trb=='N') nrowb = k
 
 if (m==0||n==0||((fabs(alpha)< PLUMED_GMX_DOUBLE_MIN||k==0) &&fabs(beta-1.0)< PLUMED_GMX_DOUBLE_EPS)) return
 
 if (fabs(alpha)< PLUMED_GMX_DOUBLE_MIN) = incx * (1 - n)
 
void PLUMED_BLAS_F77_FUNC (dgemv, DGEMV)(const char *trans
 
 if (n<=0||m<=0||(fabs(alpha)< PLUMED_GMX_DOUBLE_MIN &&fabs(beta-1.0)< PLUMED_GMX_DOUBLE_EPS)) return
 
 if (ch=='N')
 
 if (incx >0) kx = 1
 
 if (incy >0) ky = 1
 
 if (fabs(beta-1.0)>PLUMED_GMX_DOUBLE_EPS)
 
 if (incx==1)
 
void PLUMED_BLAS_F77_FUNC (dger, DGER)(int *m__
 
double PLUMED_BLAS_F77_FUNC (dnrm2, DNRM2)(int *n__
 
else if (n==1)
 
 for (ix=1;ix<=max_ix;ix+=incx)
 
return scalesqrt (ssq)
 
void PLUMED_BLAS_F77_FUNC (drot, DROT)(int *n__
 
void PLUMED_BLAS_F77_FUNC (dscal, DSCAL)(int *n__
 
void PLUMED_BLAS_F77_FUNC (dswap, DSWAP)(int *n__
 
void PLUMED_BLAS_F77_FUNC (dsymv, DSYMV)(const char *uplo
 
 if (n<=0||incx==0||incy==0) return
 
void PLUMED_BLAS_F77_FUNC (dsyr2, DSYR2)(const char *uplo
 
void PLUMED_BLAS_F77_FUNC (dsyr2k, DSYR2K)(const char *uplo
 
 if (ch2=='N') nrowa = n
 
void PLUMED_BLAS_F77_FUNC (dtrmm, DTRMM)(const char *side
 
 if (lside)
 
void PLUMED_BLAS_F77_FUNC (dtrmv, DTRMV)(const char *uplo
 
 if (incx<=0)
 
void PLUMED_BLAS_F77_FUNC (dtrsm, DTRSM)(const char *side
 
 if (xside=='L')
 
int PLUMED_BLAS_F77_FUNC (idamax, IDAMAX)(int *n__
 
int PLUMED_BLAS_F77_FUNC (isamax, ISAMAX)(int *n__
 
float PLUMED_BLAS_F77_FUNC (sasum, SASUM)(int *n__
 
void PLUMED_BLAS_F77_FUNC (saxpy, SAXPY)(int *n_arg
 
void PLUMED_BLAS_F77_FUNC (scopy, SCOPY)(int *n__
 
float PLUMED_BLAS_F77_FUNC (sdot, SDOT)(int *n_arg
 
void PLUMED_BLAS_F77_FUNC (sgemm, SGEMM)(const char *transa
 
void PLUMED_BLAS_F77_FUNC (sgemv, SGEMV)(const char *trans
 
 if (n<=0||m<=0||(fabs(alpha)< PLUMED_GMX_FLOAT_MIN &&fabs(beta-1.0)< PLUMED_GMX_FLOAT_EPS)) return
 
 if (fabs(beta-1.0)>PLUMED_GMX_FLOAT_EPS)
 
void PLUMED_BLAS_F77_FUNC (sger, SGER)(int *m__
 
float PLUMED_BLAS_F77_FUNC (snrm2, SNRM2)(int *n__
 
void PLUMED_BLAS_F77_FUNC (srot, SROT)(int *n__
 
void PLUMED_BLAS_F77_FUNC (sscal, SSCAL)(int *n__
 
void PLUMED_BLAS_F77_FUNC (sswap, SSWAP)(int *n__
 
void PLUMED_BLAS_F77_FUNC (ssymv, SSYMV)(const char *uplo
 
void PLUMED_BLAS_F77_FUNC (ssyr2, SSYR2)(const char *uplo
 
void PLUMED_BLAS_F77_FUNC (ssyr2k, SSYR2K)(const char *uplo
 
void PLUMED_BLAS_F77_FUNC (strmm, STRMM)(const char *side
 
void PLUMED_BLAS_F77_FUNC (strmv, STRMV)(const char *uplo
 
void PLUMED_BLAS_F77_FUNC (strsm, STRSM)(const char *side
 

Variables

double double * dx
 
double double int * incx__
 
int i__
 
int m = n % 6
 
int mp1 = m + 1
 
double dtemp = 0.
 
int nincx
 
int n = *n__
 
int incx = *incx__
 
 i__2 = n
 
void double * da_arg
 
void double double int * incx_arg
 
void double double int double * dy
 
void double double int double int * incy_arg
 
double da =*da_arg
 
int incy = *incy_arg
 
 else
 
void double int double int * incy__
 
double t1 = 0.0
 
void const char * transb
 
void const char int * m__
 
void const char int int * n__
 
void const char int int int * k__
 
void const char int int int double * alpha__
 
void const char int int int double double * a = a_offset
 
void const char int int int double double int * lda__
 
void const char int int int double double int double * b = b_offset
 
void const char int int int double double int double int * ldb__
 
void const char int int int double double int double int double * beta__
 
void const char int int int double double int double int double double * c = *c__
 
void const char int int int double double int double int double double int * ldc__
 
const char trb =toupper(*transb)
 
double temp
 
int i
 
int j
 
int l
 
int nrowa = k
 
int ncola = m
 
int nrowb = n
 
int k = *k__
 
int lda = *lda__
 
int ldb = *ldb__
 
int ldc = *ldc__
 
double alpha = *alpha__
 
double beta = *beta__
 
void int int double double int double * x
 
void int int double double int double int double double * y
 
int lenx
 
int leny = n
 
int kx = 1 - (lenx -1)*(incx)
 
int ky = 1 - (leny -1)*(incy)
 
int jx = jy = kx = ky = 0
 
int jy = incy * (1 - n)
 
int ix
 
int iy = 0
 
 return
 
double ssq = 1.0
 
double scale = 0.0
 
double absxi
 
double t
 
 max_ix = 1+(n-1)*(incx)
 
void double int double int double * c__
 
void double int double int double double * s__
 
double s = *s__
 
void double * fact__
 
double fact = *fact__
 
double d1
 
double d2
 
double d3
 
double temp1
 
double temp2
 
const char ch =toupper(*uplo)
 
void const char * trans
 
 ch1 = toupper(*uplo)
 
 ch2 = toupper(*trans)
 
void const char * uplo
 
void const char const char * transa
 
void const char const char const char * diag
 
int info = 0
 
int lside = (*side=='L' || *side=='l')
 
int upper = (*uplo=='U' || *uplo=='u')
 
int nounit = (*diag=='N' || *diag=='n')
 
 a_dim1 = lda
 
 a_offset = 1 + a_dim1
 
 b_dim1 = ldb
 
 b_offset = 1 + b_dim1
 
const char xuplo = toupper(*uplo)
 
const char xtrans = toupper(*transa)
 
const char xdiag = toupper(*diag)
 
double dmax = fabs(dx[0])
 
double tmp
 
 idxmax = 1
 

Function Documentation

◆ for() [1/3]

PLMD::blas::for ( i__  = mp1i__ <= i__2i__ += 6)

◆ for() [2/3]

PLMD::blas::for ( )
Initial value:
= t1 + dx[i] * dy[i]
+ dx[i+1] * dy[i+1]
+ dx[i+2] * dy[i+2]
+ dx[i+3] * dy[i+3]
+ dx[i+4] * dy[i+4]
double t1
Definition: blas.cpp:337
void double double int double * dy
Definition: blas.cpp:157
int i
Definition: blas.cpp:440
double double * dx
Definition: blas.cpp:65

◆ for() [3/3]

PLMD::blas::for ( ix  = 1;ix<=max_ix;ix+=incx)

◆ if() [1/23]

PLMD::blas::if ( n<=0||incx<=  0)

◆ if() [2/23]

PLMD::blas::if ( incx = 1)

◆ if() [3/23]

PLMD::blas::if ( m = 0)

◆ if() [4/23]

PLMD::blas::if ( n<=  0)

◆ if() [5/23]

PLMD::blas::if ( incx!  = 1 || incy!=1)

◆ if() [6/23]

PLMD::blas::if ( tra  = ='N')

◆ if() [7/23]

PLMD::blas::if ( trb  = ='N') = k

◆ if() [8/23]

PLMD::blas::if ( m  = =0||n==0||((fabs(alpha)< PLUMED_GMX_DOUBLE_MIN||k==0) &&fabs(beta-1.0)< PLUMED_GMX_DOUBLE_EPS))

◆ if() [9/23]

PLMD::blas::if ( ) = incx * (1 - n)

◆ if() [10/23]

PLMD::blas::if ( n<=0||m<=0||  fabs(alpha)< PLUMED_GMX_DOUBLE_MIN &&fabs(beta-1.0)< PLUMED_GMX_DOUBLE_EPS)

◆ if() [11/23]

PLMD::blas::if ( ch  = ='N')

◆ if() [12/23]

PLMD::blas::if ( incx  ,
 
) = 1

◆ if() [13/23]

PLMD::blas::if ( incy  ,
 
) = 1

◆ if() [14/23]

PLMD::blas::if ( fabs(beta-1.0)  ,
PLUMED_GMX_DOUBLE_EPS   
)

◆ if() [15/23]

PLMD::blas::if ( incx  = =1)

◆ if() [16/23]

PLMD::blas::if ( n  = =1)

◆ if() [17/23]

PLMD::blas::if ( n<=0||  incx = =0||incy==0)

◆ if() [18/23]

PLMD::blas::if ( ch2  = = 'N') = n

◆ if() [19/23]

PLMD::blas::if ( lside  )

◆ if() [20/23]

PLMD::blas::if ( incx<=  0)

◆ if() [21/23]

PLMD::blas::if ( xside  = ='L')

◆ if() [22/23]

PLMD::blas::if ( n<=0||m<=0||  fabs(alpha)< PLUMED_GMX_FLOAT_MIN &&fabs(beta-1.0)< PLUMED_GMX_FLOAT_EPS)

◆ if() [23/23]

PLMD::blas::if ( fabs(beta-1.0)  ,
PLUMED_GMX_FLOAT_EPS   
)

◆ PLUMED_BLAS_F77_FUNC() [1/36]

double PLMD::blas::PLUMED_BLAS_F77_FUNC ( dasum  ,
DASUM   
)

◆ PLUMED_BLAS_F77_FUNC() [2/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( daxpy  ,
DAXPY   
)

◆ PLUMED_BLAS_F77_FUNC() [3/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dcopy  ,
DCOPY   
)

◆ PLUMED_BLAS_F77_FUNC() [4/36]

double PLMD::blas::PLUMED_BLAS_F77_FUNC ( ddot  ,
DDOT   
)

◆ PLUMED_BLAS_F77_FUNC() [5/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dgemm  ,
DGEMM   
) const

◆ PLUMED_BLAS_F77_FUNC() [6/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dgemv  ,
DGEMV   
) const

◆ PLUMED_BLAS_F77_FUNC() [7/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dger  ,
DGER   
)

◆ PLUMED_BLAS_F77_FUNC() [8/36]

double PLMD::blas::PLUMED_BLAS_F77_FUNC ( dnrm2  ,
DNRM2   
)

◆ PLUMED_BLAS_F77_FUNC() [9/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( drot  ,
DROT   
)

◆ PLUMED_BLAS_F77_FUNC() [10/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dscal  ,
DSCAL   
)

◆ PLUMED_BLAS_F77_FUNC() [11/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dswap  ,
DSWAP   
)

◆ PLUMED_BLAS_F77_FUNC() [12/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dsymv  ,
DSYMV   
) const

◆ PLUMED_BLAS_F77_FUNC() [13/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dsyr2  ,
DSYR2   
) const

◆ PLUMED_BLAS_F77_FUNC() [14/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dsyr2k  ,
DSYR2K   
) const

◆ PLUMED_BLAS_F77_FUNC() [15/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dtrmm  ,
DTRMM   
) const

◆ PLUMED_BLAS_F77_FUNC() [16/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dtrmv  ,
DTRMV   
) const

◆ PLUMED_BLAS_F77_FUNC() [17/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( dtrsm  ,
DTRSM   
) const

◆ PLUMED_BLAS_F77_FUNC() [18/36]

int PLMD::blas::PLUMED_BLAS_F77_FUNC ( idamax  ,
IDAMAX   
)

◆ PLUMED_BLAS_F77_FUNC() [19/36]

int PLMD::blas::PLUMED_BLAS_F77_FUNC ( isamax  ,
ISAMAX   
)

◆ PLUMED_BLAS_F77_FUNC() [20/36]

__PLUMED_BLAS_RETURNS_FLOAT PLMD::blas::PLUMED_BLAS_F77_FUNC ( sasum  ,
SASUM   
)

◆ PLUMED_BLAS_F77_FUNC() [21/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( saxpy  ,
SAXPY   
)

◆ PLUMED_BLAS_F77_FUNC() [22/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( scopy  ,
SCOPY   
)

◆ PLUMED_BLAS_F77_FUNC() [23/36]

__PLUMED_BLAS_RETURNS_FLOAT PLMD::blas::PLUMED_BLAS_F77_FUNC ( sdot  ,
SDOT   
)

◆ PLUMED_BLAS_F77_FUNC() [24/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( sgemm  ,
SGEMM   
) const

◆ PLUMED_BLAS_F77_FUNC() [25/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( sgemv  ,
SGEMV   
) const

◆ PLUMED_BLAS_F77_FUNC() [26/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( sger  ,
SGER   
)

◆ PLUMED_BLAS_F77_FUNC() [27/36]

__PLUMED_BLAS_RETURNS_FLOAT PLMD::blas::PLUMED_BLAS_F77_FUNC ( snrm2  ,
SNRM2   
)

◆ PLUMED_BLAS_F77_FUNC() [28/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( srot  ,
SROT   
)

◆ PLUMED_BLAS_F77_FUNC() [29/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( sscal  ,
SSCAL   
)

◆ PLUMED_BLAS_F77_FUNC() [30/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( sswap  ,
SSWAP   
)

◆ PLUMED_BLAS_F77_FUNC() [31/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( ssymv  ,
SSYMV   
) const

◆ PLUMED_BLAS_F77_FUNC() [32/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( ssyr2  ,
SSYR2   
) const

◆ PLUMED_BLAS_F77_FUNC() [33/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( ssyr2k  ,
SSYR2K   
) const

◆ PLUMED_BLAS_F77_FUNC() [34/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( strmm  ,
STRMM   
) const

◆ PLUMED_BLAS_F77_FUNC() [35/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( strmv  ,
STRMV   
) const

◆ PLUMED_BLAS_F77_FUNC() [36/36]

void PLMD::blas::PLUMED_BLAS_F77_FUNC ( strsm  ,
STRSM   
) const

◆ sqrt()

return scale * PLMD::blas::sqrt ( ssq  )

Variable Documentation

◆ a

void const char const char const char int int float float * PLMD::blas::a = a_offset

◆ a_dim1

PLMD::blas::a_dim1 = lda

◆ a_offset

PLMD::blas::a_offset = 1 + a_dim1

◆ absxi

float PLMD::blas::absxi

◆ alpha

void const char const char const char int int float * PLMD::blas::alpha = *alpha__

◆ alpha__

void const char const char const char int int float * PLMD::blas::alpha__

◆ b

void const char const char const char int int float float int float * PLMD::blas::b = b_offset

◆ b_dim1

PLMD::blas::b_dim1 = ldb

◆ b_offset

PLMD::blas::b_offset = 1 + b_dim1

◆ beta

void const char int int float float int float int float * PLMD::blas::beta = *beta__

◆ beta__

void const char int int float float int float int float * PLMD::blas::beta__

◆ c

void const char int int float float int float int float float * PLMD::blas::c = *c__

◆ c__

void float int float int float * PLMD::blas::c__

◆ ch

const char PLMD::blas::ch =toupper(*uplo)

◆ ch1

PLMD::blas::ch1 = toupper(*uplo)

◆ ch2

PLMD::blas::ch2 = toupper(*trans)

◆ d1

float PLMD::blas::d1

◆ d2

float PLMD::blas::d2

◆ d3

float PLMD::blas::d3

◆ da

void float * PLMD::blas::da =*da_arg

◆ da_arg

void float * PLMD::blas::da_arg

◆ diag

void const char const char const char * PLMD::blas::diag

◆ dmax

float PLMD::blas::dmax = fabs(dx[0])

◆ dtemp

float PLMD::blas::dtemp = 0.

◆ dx

int float * PLMD::blas::dx

◆ dy

void float int float * PLMD::blas::dy

◆ else

PLMD::blas::else
Initial value:
{
for(i=0;i<(n-4);i+=4) {
dy[i] += da*dx[i];
dy[i+1] += da*dx[i+1];
dy[i+2] += da*dx[i+2];
dy[i+3] += da*dx[i+3];
}
for(;i<n;i++)
dy[i] += da*dx[i]
int n
Definition: blas.cpp:74
double da
Definition: blas.cpp:165
void double double int double * dy
Definition: blas.cpp:157
int i
Definition: blas.cpp:440
double double * dx
Definition: blas.cpp:65

◆ fact

void float * PLMD::blas::fact = *fact__

◆ fact__

void float * PLMD::blas::fact__

◆ i

int PLMD::blas::i

◆ i__

int PLMD::blas::i__

◆ i__2

PLMD::blas::i__2 = n

◆ idxmax

return PLMD::blas::idxmax = 1

◆ incx

int float int * PLMD::blas::incx = *incx__

◆ incx__

void const char const char int float int float int * PLMD::blas::incx__
Initial value:
{
int i__1, i__2
i__2
Definition: blas.cpp:104
i__1
Definition: lapack.cpp:243

◆ incx_arg

float float int * PLMD::blas::incx_arg

◆ incy

void int float float int float int * PLMD::blas::incy = *incy_arg

◆ incy__

void int float float int float int * PLMD::blas::incy__
Initial value:
{
int i,ix,iy
int ix
Definition: blas.cpp:615
int i
Definition: blas.cpp:440
int iy
Definition: blas.cpp:615

◆ incy_arg

float float int float int * PLMD::blas::incy_arg
Initial value:
{
int i,ix,iy
int ix
Definition: blas.cpp:615
int i
Definition: blas.cpp:440
int iy
Definition: blas.cpp:615

◆ info

int PLMD::blas::info = 0

◆ ix

int PLMD::blas::ix

◆ iy

int PLMD::blas::iy = 0

◆ j

int PLMD::blas::j

◆ jx

int PLMD::blas::jx = jy = kx = ky = 0

◆ jy

int PLMD::blas::jy = incy * (1 - n)

◆ k

void const char int int * PLMD::blas::k = *k__

◆ k__

void const char int int * PLMD::blas::k__

◆ kx

int PLMD::blas::kx = 1 - (lenx -1)*(incx)

◆ ky

else PLMD::blas::ky = 1 - (leny -1)*(incy)

◆ l

int PLMD::blas::l

◆ lda

void const char const char const char int int float float int * PLMD::blas::lda = *lda__

◆ lda__

void const char const char const char int int float float int * PLMD::blas::lda__
Initial value:
{
int ix,kx,jy
int jy
Definition: blas.cpp:615
int kx
Definition: blas.cpp:614
int ix
Definition: blas.cpp:615

◆ ldb

void const char const char const char int int float float int float int * PLMD::blas::ldb = *ldb__

◆ ldb__

void const char const char const char int int float float int float int * PLMD::blas::ldb__
Initial value:
{
b_dim1
Definition: blas.cpp:1753
b_offset
Definition: blas.cpp:1754
a_dim1
Definition: blas.cpp:1750
i__2
Definition: blas.cpp:104
i__1
Definition: lapack.cpp:243
int i__3
Definition: lapack.cpp:2671
a_offset
Definition: blas.cpp:1751

◆ ldc

void const char int int float float int float int float float int * PLMD::blas::ldc = *ldc__

◆ ldc__

void const char int int float float int float int float float int * PLMD::blas::ldc__
Initial value:
{
const char tra=toupper(*transa)
void const char const char * transa
Definition: blas.cpp:1724

◆ lenx

int PLMD::blas::lenx

◆ leny

int PLMD::blas::leny = n

◆ lside

int PLMD::blas::lside = (*side=='L' || *side=='l')

◆ m

void const char const char const char int * PLMD::blas::m = n % 6

◆ m__

void const char const char const char int * PLMD::blas::m__

◆ max_ix

PLMD::blas::max_ix = 1+(n-1)*(incx)

◆ mp1

int PLMD::blas::mp1 = m + 1

◆ n

void const char const char const char int int * PLMD::blas::n = *n__

◆ n__

void const char const char const char int int * PLMD::blas::n__

◆ ncola

int PLMD::blas::ncola = m

◆ nincx

int PLMD::blas::nincx

◆ nounit

int PLMD::blas::nounit = (*diag=='N' || *diag=='n')

◆ nrowa

int PLMD::blas::nrowa = k

◆ nrowb

else PLMD::blas::nrowb = n

◆ return

PLMD::blas::return

◆ s

void float int float int float float * PLMD::blas::s = *s__

◆ s__

void float int float int float float * PLMD::blas::s__
Initial value:
{
int i,ix,iy
int ix
Definition: blas.cpp:615
int i
Definition: blas.cpp:440
int iy
Definition: blas.cpp:615

◆ scale

float PLMD::blas::scale = 0.0

◆ ssq

float PLMD::blas::ssq = 1.0

◆ t

float PLMD::blas::t

◆ t1

return PLMD::blas::t1 = 0.0

◆ temp

float PLMD::blas::temp

◆ temp1

float PLMD::blas::temp1

◆ temp2

float PLMD::blas::temp2

◆ tmp

float PLMD::blas::tmp

◆ trans

void const char * PLMD::blas::trans

◆ transa

void const char const char * PLMD::blas::transa

◆ transb

void const char * PLMD::blas::transb

◆ trb

const char PLMD::blas::trb =toupper(*transb)

◆ uplo

void const char * PLMD::blas::uplo

◆ upper

int PLMD::blas::upper = (*uplo=='U' || *uplo=='u')

◆ x

void const char const char int float int float * PLMD::blas::x

◆ xdiag

const char PLMD::blas::xdiag = toupper(*diag)

◆ xtrans

const char PLMD::blas::xtrans = toupper(*transa)

◆ xuplo

const char PLMD::blas::xuplo = toupper(*uplo)

◆ y

void int float float int float * PLMD::blas::y