gauss_sum Function

private elemental function gauss_sum(n)

@brief Calculate 1 + … + n

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	n

Return Value integer

Contents