SUBROUTINE KGFITP(IMAX, EPS)
C
C  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
C     Returns fitting parameters
C
C *IMAX    integer variable (write)
C          Max number of iterations for fit
C
C *EPS     real variable (write)
C          Stop iterating fit when delta(chisq) < EPS
C  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>