grad_sum Function

public function grad_sum(grad) result(g)

sum the gradients along coordinates x,y,z

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=long),	intent(in)			::	grad(:)

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