magfield Function

function magfield(rvec) result(b)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	rvec(3)

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