MFIX  2016-1
Functions/Subroutines
BLAS.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine caxpy (N, CA, CX, INCX, CY, INCY)
 CAXPY More...
 
subroutine ccopy (N, CX, INCX, CY, INCY)
 CCOPY More...
 
subroutine crotg (CA, CB, C, S)
 CROTG More...
 
subroutine cscal (N, CA, CX, INCX)
 CSCAL More...
 
subroutine csscal (N, SA, CX, INCX)
 CSSCAL More...
 
subroutine cswap (N, CX, INCX, CY, INCY)
 CSWAP More...
 
subroutine daxpy (N, DA, DX, INCX, DY, INCY)
 DAXPY More...
 
subroutine dcopy (N, DX, INCX, DY, INCY)
 DCOPY More...
 
subroutine drot (N, DX, INCX, DY, INCY, C, S)
 DROT More...
 
subroutine drotg (DA, DB, C, S)
 DROTG More...
 
subroutine dscal (N, DA, DX, INCX)
 DSCAL More...
 
subroutine dswap (N, DX, INCX, DY, INCY)
 DSWAP More...
 
subroutine saxpy (N, SA, SX, INCX, SY, INCY)
 SAXPY More...
 
subroutine scopy (N, SX, INCX, SY, INCY)
 SCOPY More...
 
subroutine srot (N, SX, INCX, SY, INCY, C, S)
 SROT More...
 
subroutine srotg (SA, SB, C, S)
 SROTG More...
 
subroutine sscal (N, SA, SX, INCX)
 SSCAL More...
 
subroutine sswap (N, SX, INCX, SY, INCY)
 SSWAP More...
 
complex function cdotc (N, CX, INCX, CY, INCY)
 CDOTC More...
 
complex function cdotu (N, CX, INCX, CY, INCY)
 CDOTU More...
 
double precision function dasum (N, DX, INCX)
 DASUM More...
 
double precision function ddot (N, DX, INCX, DY, INCY)
 DDOT More...
 
double precision function dnrm2 (N, X, INCX)
 DNRM2 More...
 
integer function icamax (N, CX, INCX)
 ICAMAX More...
 
integer function idamax (N, DX, INCX)
 IDAMAX More...
 
integer function isamax (N, SX, INCX)
 ISAMAX More...
 
real function sasum (N, SX, INCX)
 SASUM More...
 
real function scasum (N, CX, INCX)
 SCASUM More...
 
real function scnrm2 (N, X, INCX)
 SCNRM2 More...
 
real function sdsdot (N, SB, SX, INCX, SY, INCY)
 SDSDOT More...
 
real function snrm2 (N, X, INCX)
 SNRM2 More...
 
real function scabs1 (Z)
 SCABS1 More...
 

Function/Subroutine Documentation

subroutine caxpy ( integer  N,
complex  CA,
complex, dimension(*)  CX,
integer  INCX,
complex, dimension(*)  CY,
integer  INCY 
)

CAXPY

Purpose: 
    CAXPY constant times a vector plus a vector.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 67 of file BLAS.f.

subroutine ccopy ( integer  N,
complex, dimension(*)  CX,
integer  INCX,
complex, dimension(*)  CY,
integer  INCY 
)

CCOPY

Purpose: 
    CCOPY copies a vector x to a vector y.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 168 of file BLAS.f.

complex function cdotc ( integer  N,
complex, dimension(*)  CX,
integer  INCX,
complex, dimension(*)  CY,
integer  INCY 
)

CDOTC

Purpose: 
    forms the dot product of two vectors, conjugating the first
    vector.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack,  3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 1918 of file BLAS.f.

complex function cdotu ( integer  N,
complex, dimension(*)  CX,
integer  INCX,
complex, dimension(*)  CY,
integer  INCY 
)

CDOTU

Purpose: 
    CDOTU forms the dot product of two vectors.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 2019 of file BLAS.f.

subroutine crotg ( complex  CA,
complex  CB,
real  C,
complex  S 
)

CROTG

Purpose: 
 CROTG determines a complex Givens rotation.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011

Definition at line 251 of file BLAS.f.

subroutine cscal ( integer  N,
complex  CA,
complex, dimension(*)  CX,
integer  INCX 
)

CSCAL

Purpose: 
    CSCAL scales a vector by a constant.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack,  3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 338 of file BLAS.f.

subroutine csscal ( integer  N,
real  SA,
complex, dimension(*)  CX,
integer  INCX 
)

CSSCAL

Purpose: 
    CSSCAL scales a complex vector by a real constant.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 429 of file BLAS.f.

subroutine cswap ( integer  N,
complex, dimension(*)  CX,
integer  INCX,
complex, dimension(*)  CY,
integer  INCY 
)

CSWAP

Purpose: 
   CSWAP interchanges two vectors.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 521 of file BLAS.f.

double precision function dasum ( integer  N,
double precision, dimension(*)  DX,
integer  INCX 
)

DASUM

Purpose: 
    DASUM takes the sum of the absolute values.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 2118 of file BLAS.f.

subroutine daxpy ( integer  N,
double precision  DA,
double precision, dimension(*)  DX,
integer  INCX,
double precision, dimension(*)  DY,
integer  INCY 
)

DAXPY

Purpose: 
    DAXPY constant times a vector plus a vector.
    uses unrolled loops for increments equal to one.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 621 of file BLAS.f.

Here is the caller graph for this function:

subroutine dcopy ( integer  N,
double precision, dimension(*)  DX,
integer  INCX,
double precision, dimension(*)  DY,
integer  INCY 
)

DCOPY

Purpose: 
    DCOPY copies a vector, x, to a vector, y.
    uses unrolled loops for increments equal to one.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 735 of file BLAS.f.

Here is the caller graph for this function:

double precision function ddot ( integer  N,
double precision, dimension(*)  DX,
integer  INCX,
double precision, dimension(*)  DY,
integer  INCY 
)

DDOT

Purpose: 
    DDOT forms the dot product of two vectors.
    uses unrolled loops for increments equal to one.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 2229 of file BLAS.f.

double precision function dnrm2 ( integer  N,
double precision, dimension(*)  X,
integer  INCX 
)

DNRM2

Purpose: 
 DNRM2 returns the euclidean norm of a vector via the function
 name, so that

    DNRM2 := sqrt( x'*x )
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
  -- This version written on 25-October-1982.
     Modified on 14-October-1993 to inline the call to DLASSQ.
     Sven Hammarling, Nag Ltd.

Definition at line 2349 of file BLAS.f.

subroutine drot ( integer  N,
double precision, dimension(*)  DX,
integer  INCX,
double precision, dimension(*)  DY,
integer  INCY,
double precision  C,
double precision  S 
)

DROT

Purpose: 
    DROT applies a plane rotation.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 850 of file BLAS.f.

subroutine drotg ( double precision  DA,
double precision  DB,
double precision  C,
double precision  S 
)

DROTG

Purpose: 
    DROTG construct givens plane rotation.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.

Definition at line 946 of file BLAS.f.

subroutine dscal ( integer  N,
double precision  DA,
double precision, dimension(*)  DX,
integer  INCX 
)

DSCAL

Purpose: 
    DSCAL scales a vector by a constant.
    uses unrolled loops for increment equal to one.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 1039 of file BLAS.f.

Here is the caller graph for this function:

subroutine dswap ( integer  N,
double precision, dimension(*)  DX,
integer  INCX,
double precision, dimension(*)  DY,
integer  INCY 
)

DSWAP

Purpose: 
    interchanges two vectors.
    uses unrolled loops for increments equal one.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 1147 of file BLAS.f.

integer function icamax ( integer  N,
complex, dimension(*)  CX,
integer  INCX 
)

ICAMAX

Purpose: 
    ICAMAX finds the index of element having max. absolute value.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 2458 of file BLAS.f.

integer function idamax ( integer  N,
double precision, dimension(*)  DX,
integer  INCX 
)

IDAMAX

Purpose: 
    IDAMAX finds the index of element having max. absolute value.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 2565 of file BLAS.f.

integer function isamax ( integer  N,
real, dimension(*)  SX,
integer  INCX 
)

ISAMAX

Purpose: 
    ISAMAX finds the index of element having max. absolute value.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 2671 of file BLAS.f.

real function sasum ( integer  N,
real, dimension(*)  SX,
integer  INCX 
)

SASUM

Purpose: 
    SASUM takes the sum of the absolute values.
    uses unrolled loops for increment equal to one.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 2778 of file BLAS.f.

subroutine saxpy ( integer  N,
real  SA,
real, dimension(*)  SX,
integer  INCX,
real, dimension(*)  SY,
integer  INCY 
)

SAXPY

Purpose: 
    SAXPY constant times a vector plus a vector.
    uses unrolled loops for increments equal to one.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 1270 of file BLAS.f.

real function scabs1 ( complex  Z)

SCABS1

Purpose: 
 SCABS1 computes absolute value of a complex number
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011

Definition at line 3459 of file BLAS.f.

real function scasum ( integer  N,
complex, dimension(*)  CX,
integer  INCX 
)

SCASUM

Purpose: 
    SCASUM takes the sum of the absolute values of a complex vector and
    returns a single precision result.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 2890 of file BLAS.f.

real function scnrm2 ( integer  N,
complex, dimension(*)  X,
integer  INCX 
)

SCNRM2

Purpose: 
 SCNRM2 returns the euclidean norm of a vector via the function
 name, so that

    SCNRM2 := sqrt( x**H*x )
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
  -- This version written on 25-October-1982.
     Modified on 14-October-1993 to inline the call to CLASSQ.
     Sven Hammarling, Nag Ltd.

Definition at line 2989 of file BLAS.f.

subroutine scopy ( integer  N,
real, dimension(*)  SX,
integer  INCX,
real, dimension(*)  SY,
integer  INCY 
)

SCOPY

Purpose: 
    SCOPY copies a vector, x, to a vector, y.
    uses unrolled loops for increments equal to 1.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 1384 of file BLAS.f.

real function sdsdot ( integer  N,
real  SB,
real, dimension(*)  SX,
integer  INCX,
real, dimension(*)  SY,
integer  INCY 
)

SDSDOT

Purpose:
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011

Definition at line 3194 of file BLAS.f.

real function snrm2 ( integer  N,
real, dimension(*)  X,
integer  INCX 
)

SNRM2

Purpose: 
 SNRM2 returns the euclidean norm of a vector via the function
 name, so that

    SNRM2 := sqrt( x'*x ).
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
  -- This version written on 25-October-1982.
     Modified on 14-October-1993 to inline the call to SLASSQ.
     Sven Hammarling, Nag Ltd.

Definition at line 3363 of file BLAS.f.

subroutine srot ( integer  N,
real, dimension(*)  SX,
integer  INCX,
real, dimension(*)  SY,
integer  INCY,
real  C,
real  S 
)

SROT

Purpose: 
    applies a plane rotation.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 1499 of file BLAS.f.

subroutine srotg ( real  SA,
real  SB,
real  C,
real  S 
)

SROTG

Purpose: 
    SROTG construct givens plane rotation.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.

Definition at line 1595 of file BLAS.f.

subroutine sscal ( integer  N,
real  SA,
real, dimension(*)  SX,
integer  INCX 
)

SSCAL

Purpose: 
    scales a vector by a constant.
    uses unrolled loops for increment equal to 1.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 1688 of file BLAS.f.

subroutine sswap ( integer  N,
real, dimension(*)  SX,
integer  INCX,
real, dimension(*)  SY,
integer  INCY 
)

SSWAP

Purpose: 
    interchanges two vectors.
    uses unrolled loops for increments equal to 1.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details: 
     jack dongarra, linpack, 3/11/78.
     modified 12/3/93, array(1) declarations changed to array(*)

Definition at line 1796 of file BLAS.f.