subroutine kget_fit_criteria(max_iter, max_delta_chi)
*
* begin_doc
*
c  Returns fitting criteria used in all fits
*
*  Input Parameters:
*  None
*
*  Output Parameters:
*  max_iter        integer variable
*                  Max number of iterations to use in fit
*
*  max_delta_chi   double precision variable
*                  Stop iterating fit when delta(chisq) < delta_chi_max
*
*  Other routines:
*
*  Notes:
*
*  Author:   Paul Avery      Created:  Fri Sep  5 14:15:42 EDT 1997
*
*  Major revisions:
*
*
* end_doc