check_sums_equal_1 Subroutine

public subroutine check_sums_equal_1(arr, lb, name, caller, ier)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r8),	intent(in)			::	arr(lb:,:)
integer,	intent(in)			::	lb
character(len=*),	intent(in)			::	name
character(len=*),	intent(in)			::	caller
integer,	intent(out),	optional		::	ier