// Scilab code developed by:
// International Research Institute for Climate and Society
// Columbia University in the City of New York, USA
// Last update: June 26, 2013
// --------------------------------------------------------------------------------------------------------
// Dependancies : (see each function for further details)
//      -- infected_init.sci for basic computation of the models
// --------------------------------------------------------------------------------------------------------
// Functions :
//      -- Basic function infected, that assume no variation in the initial conditions
// --------------------------------------------------------------------------------------------------------

Directory_infected='/Volumes/shared_data/paulb/Scilab/Infected/'

function[I]=infected_basic(param,ti,tf,XXX)
    
    pa=param;
    pa($+1)=0; // Last parameter is the variation of the initial condition. Set to 0 here.

    I=infected_init(pa,ti,tf,XXX);

endfunction