/** @(#) chartdoglegfile.cpp */

#include "chartdoglegfile.h"
/**
* @author Daniel Alba Cuellar
* @author Omar Posada Villarreal
* @param xc Contiene a, b, c
* @version 1.0, /03/2002
*/
void chartDoglegFile(VectorDouble &time, VectorDouble &population,
		VectorDouble &xc, TChart *chart) {
        TChartSeries *pReal;	// Series1
        TChartSeries *pEstim;	// Series2

	pReal = chart->Series[0];
	pEstim = chart->Series[1];

        pReal->Clear();
        pEstim->Clear();

	time.setLogic(0);
        population.setLogic(0);
        xc.setLogic(0);
	double a = xc[0];
	double b = xc[1];
        double c = xc[2];

        double	fc; 	//evalPop;
        int	n = time.getSize();
	int i;
        for (i = 0; i < n; ++i) {
		pReal->AddXY(time[i], population[i],
                	AnsiString(""), clTeeColor);
                fc = a * c / ( b * c + exp(-a * time[i]) );
		pEstim->AddXY(time[i], fc,
                	AnsiString(""), clTeeColor);
        }
}
// Fin------------------------------------------------------------------------