lbfgsb_blas_module Module

BLAS support routines for LBFGSB. These have been refactored into modern Fortran.


Uses

  • module~~lbfgsb_blas_module~~UsesGraph module~lbfgsb_blas_module lbfgsb_blas_module module~lbfgsb_kinds_module lbfgsb_kinds_module module~lbfgsb_blas_module->module~lbfgsb_kinds_module iso_fortran_env iso_fortran_env module~lbfgsb_kinds_module->iso_fortran_env

Used by

  • module~~lbfgsb_blas_module~~UsedByGraph module~lbfgsb_blas_module lbfgsb_blas_module module~lbfgsb_linpack_module lbfgsb_linpack_module module~lbfgsb_linpack_module->module~lbfgsb_blas_module module~lbfgsb_module lbfgsb_module module~lbfgsb_module->module~lbfgsb_blas_module module~lbfgsb_module->module~lbfgsb_linpack_module

Variables

Type Visibility Attributes Name Initial
real(kind=wp), private, parameter :: zero = 0.0_wp
real(kind=wp), private, parameter :: one = 1.0_wp
real(kind=wp), private, parameter :: two = 2.0_wp
real(kind=wp), private, parameter :: four = 4.0_wp
real(kind=wp), private, parameter :: ten = 10.0_wp
real(kind=wp), private, parameter :: hun = 100.0_wp

Functions

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

forms the dot product of two vectors. uses unrolled loops for increments equal to one.

Read more…

Arguments

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

Return Value real(kind=wp)


Subroutines

public subroutine daxpy(n, da, dx, incx, dy, incy)

constant times a vector plus a vector. uses unrolled loops for increments equal to one.

Read more…

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: n
real(kind=wp), intent(in) :: da
real(kind=wp), intent(in) :: dx(*)
integer, intent(in) :: incx
real(kind=wp), intent(inout) :: dy(*)
integer, intent(in) :: incy

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

copies a vector, x, to a vector, y. uses unrolled loops for increments equal to one.

Read more…

Arguments

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

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

scales a vector by a constant. uses unrolled loops for increment equal to one.

Read more…

Arguments

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