blas_interfaces Module

Single and double precision interfaces for the BLAS procedures used by odrpack.


Uses

  • module~~blas_interfaces~~UsesGraph module~blas_interfaces blas_interfaces module~odrpack_kinds odrpack_kinds module~blas_interfaces->module~odrpack_kinds iso_fortran_env iso_fortran_env module~odrpack_kinds->iso_fortran_env

Used by

  • module~~blas_interfaces~~UsedByGraph module~blas_interfaces blas_interfaces proc~devjac devjac proc~devjac->module~blas_interfaces proc~dfctr dfctr proc~dfctr->module~blas_interfaces proc~diniwk diniwk proc~diniwk->module~blas_interfaces proc~doddrv doddrv proc~doddrv->module~blas_interfaces proc~dodlm dodlm proc~dodlm->module~blas_interfaces proc~dodmn dodmn proc~dodmn->module~blas_interfaces proc~dodstp dodstp proc~dodstp->module~blas_interfaces proc~dpack dpack proc~dpack->module~blas_interfaces proc~dsolve dsolve proc~dsolve->module~blas_interfaces proc~dunpac dunpac proc~dunpac->module~blas_interfaces

Interfaces

interface

  • public pure function dasum(n, x, incx)

    Sum of magnitudes of vector components.

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: n
    real(kind=dp), intent(in) :: x(*)
    integer, intent(in) :: incx

    Return Value real(kind=dp)

interface

  • public pure function ddot(n, x, incx, y, incy)

    Inner product of vectors.

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: n
    real(kind=dp), intent(in) :: x(*)
    integer, intent(in) :: incx
    real(kind=dp), intent(in) :: y(*)
    integer, intent(in) :: incy

    Return Value real(kind=dp)

interface

  • public pure function dnrm2(n, x, incx)

    Euclidean length (L2 Norm) of vector.

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: n
    real(kind=dp), intent(in) :: x(*)
    integer, intent(in) :: incx

    Return Value real(kind=dp)

interface

  • public pure function idamax(n, x, incx)

    Find largest component of vector.

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: n
    real(kind=dp), intent(in) :: x(*)
    integer, intent(in) :: incx

    Return Value integer

interface

  • public pure subroutine daxpy(n, a, x, incx, y, incy)

    Computation Y = A*X + Y.

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: n
    real(kind=dp), intent(in) :: a
    real(kind=dp), intent(in) :: x(*)
    integer, intent(in) :: incx
    real(kind=dp), intent(inout) :: y(*)
    integer, intent(in) :: incy

interface

  • public pure subroutine dcopy(n, x, incx, y, incy)

    Vector copy Y = X.

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: n
    real(kind=dp), intent(in) :: x(*)
    integer, intent(in) :: incx
    real(kind=dp), intent(inout) :: y(*)
    integer, intent(in) :: incy

interface

  • public pure subroutine drot(n, x, incx, y, incy, c, s)

    Apply Givens rotation.

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: n
    real(kind=dp), intent(inout) :: x(*)
    integer, intent(in) :: incx
    real(kind=dp), intent(inout) :: y(*)
    integer, intent(in) :: incy
    real(kind=dp), intent(in) :: c
    real(kind=dp), intent(in) :: s

interface

  • public pure subroutine drotg(a, b, c, s)

    Construct plane Givens rotation.

    Arguments

    Type IntentOptional Attributes Name
    real(kind=dp), intent(in) :: a
    real(kind=dp), intent(in) :: b
    real(kind=dp), intent(out) :: c
    real(kind=dp), intent(out) :: s

interface

  • public pure subroutine dscal(n, a, x, incx)

    Vector scale X = A*X.

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: n
    real(kind=dp), intent(in) :: a
    real(kind=dp), intent(inout) :: x(*)
    integer, intent(in) :: incx

interface

  • public pure subroutine dswap(n, x, incx, y, incy)

    Interchange vectors.

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: n
    real(kind=dp), intent(in) :: x(*)
    integer, intent(in) :: incx
    real(kind=dp), intent(inout) :: y(*)
    integer, intent(in) :: incy