ptdlu Subroutine

public subroutine ptdlu(a, n, l, w)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	a
integer				::	n
real(kind=real64),	intent(out)			::	l(n)
real(kind=real64),	intent(out)			::	w(n)