cumsum Interface

public interface cumsum

Contents

Module Procedures

cumsum_r cumsum_i

Module Procedures

public recursive function cumsum_r(arr, seed) result(ans)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(in),		DIMENSION(:)	::	arr
real(kind=SP),	intent(in),	optional		::	seed

Return Value real(kind=SP), DIMENSION(size(arr))

public recursive function cumsum_i(arr, seed) result(ans)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=I4B),	intent(in),		DIMENSION(:)	::	arr
integer(kind=I4B),	intent(in),	optional		::	seed

Return Value integer(kind=I4B), DIMENSION(size(arr))