lsqpblas_module Module

this file contains BLAS routines required by subroutines LSQR and acheck.

History

  • Jacob Williams : 11/8/2019 : using modernized versions of these routines.

Uses

  • module~~lsqpblas_module~~UsesGraph module~lsqpblas_module lsqpblas_module module~lsqr_kinds lsqr_kinds module~lsqpblas_module->module~lsqr_kinds iso_fortran_env iso_fortran_env module~lsqr_kinds->iso_fortran_env

Used by

  • module~~lsqpblas_module~~UsedByGraph module~lsqpblas_module lsqpblas_module module~lsqr_module lsqr_module module~lsqr_module->module~lsqpblas_module

Functions

public function ddot(n, dx, incx, dy, incy)

dot product of two vectors

Arguments

Type IntentOptional Attributes Name
integer :: n
real(kind=wp) :: dx(*)
integer :: incx
real(kind=wp) :: dy(*)
integer :: incy

Return Value real(kind=wp)

public function dnrm2(n, x, incx)

euclidean norm of a vector.

Arguments

Type IntentOptional Attributes Name
integer :: n
real(kind=wp) :: x(*)
integer :: incx

Return Value real(kind=wp)


Subroutines

public subroutine dcopy(n, dx, incx, dy, incy)

copies a vector, x, to a vector, y.

Arguments

Type IntentOptional Attributes Name
integer :: n
real(kind=wp) :: dx(*)
integer :: incx
real(kind=wp) :: dy(*)
integer :: incy

public subroutine dscal(n, da, dx, incx)

scales a vector by a constant.

Arguments

Type IntentOptional Attributes Name
integer :: n
real(kind=wp) :: da
real(kind=wp) :: dx(*)
integer :: incx