all_finite_2d Function

private pure function all_finite_2d(a) result(ok)

True iff every element of a 2D coordinate array is finite (no NaN/Inf).

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	a(:,:)

Return Value logical