c----------------------------------------------------------------------
	subroutine SNTGR2(n,f,fint)
c simply integrates a function from 0 to 1 on n+1 uniformly spaced points, 
c producing the integral at all points inbetween. 
c
c author: Adapted from Numerical Recipes, 4.1.14, Kieron Burke, 1.29.99
c     in: n - number of gridpoints
c         f - vector with function values
c    out: fint - vector with integral values for all points inbetween
c  calls: --
	implicit real*8(a-h,o-z)
	dimension f(0:n),fint(0:n)