blas_interfaces Module

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

Uses

- daskr_kinds
Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.
Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Used by

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.
Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Interfaces

interface

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

Inner product of vectors.

Arguments

Type	Intent	Optional	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	Intent	Optional	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	Intent	Optional	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	Intent	Optional	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	Intent	Optional	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 dscal(n, a, x, incx)

Vector scale X = A*X.

Arguments

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