fred2 Interface

interface
public subroutine fred2(a, b, t, f, w, g, ak)

Arguments

Type

Intent

Optional

Attributes

Name

real(kind=SP),

intent(in)

::

a

real(kind=SP),

intent(in)

::

b

real(kind=SP),

intent(out),

DIMENSION(:)

::

t

real(kind=SP),

intent(out),

DIMENSION(:)

::

f

real(kind=SP),

intent(out),

DIMENSION(:)

::

w

function g(t)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(in),		DIMENSION(:)	::	t

Return Value real(kind=SP), DIMENSION(size(t))

function ak(t, s)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(in),		DIMENSION(:)	::	t
real(kind=SP),	intent(in),		DIMENSION(:)	::	s

Return Value real(kind=SP), DIMENSION(size(t),size(s))