ptdslv Subroutine

public subroutine ptdslv(r, n, l, w, nd)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(inout),		DIMENSION(nd,n)	::	r
integer,	intent(in)			::	n
real(kind=real64),	intent(in),		DIMENSION(n)	::	l
real(kind=real64),	intent(in),		DIMENSION(n)	::	w
integer,	intent(in)			::	nd