dmrtx Function

public function dmrtx(sintheta, costheta, sinphi, cosphi, dtheta, dphi)

calculate martix from polar spheric to xyz coordinates

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	sintheta
real(kind=real64),	intent(in)			::	costheta
real(kind=real64),	intent(in)			::	sinphi
real(kind=real64),	intent(in)			::	cosphi
real(kind=real64),	intent(in)			::	dtheta
real(kind=real64),	intent(in)			::	dphi

Return Value real(kind=real64), (3,3)