#include saprc99.spc
#include saprc99.eqn

#LOOKAT O3;

//#MONITOR O3; NO; NO2; ETHENE;

#INITVALUES

   CFACTOR = 2.4476e+13;

   ALL_SPEC = 0.0e0;
   O3P    = 1.1e-8; // inizializzato da valore in file csv dei risultati
   H2O = 2.0e+04; 

   O2  = 2.09e+5;
   AIR = 1.0e+6;
   CH4 = 0.7e0;

   NO		= 1.00e-1;
   NO2		= 5.00e-2;
   HONO		= 1.00e-3;
   SO2		= 5.00e-2;
   XC		= 2.00e-1;
   ISOPRENE	= 4.33e-4;
   TERP		= 8.20e-4;
   ETHENE	= 1.89e-2;                 
   MEOH		= 5.89e-3;
   HCOOH	= 6.77e-4;
   CCO_OH	= 1.16e-3; 
   RCO_OH	= 3.92e-4;     
   HCHO		= 1.12e-2;
   CCHO		= 2.32e-3;
   RCHO		= 1.72e-3;
   GLY		= 1.21e-4;
   MGLY		= 8.37e-5;
   METHACRO	= 1.30e-3; 
   ISOPROD	= 8.93e-5; 
   BALD		= 7.51e-5; 
   ACET		= 5.07e-3;
   MEK		= 3.26e-3;
   PROD2	= 1.93e-3; 
   PHEN		= 6.06e-4;
   CRES		= 5.60e-4;
   ALK1		= 1.17e-2;
   ALK2		= 1.88e-2;
   ALK3		= 4.69e-2;
   ALK4		= 4.17e-2;
   ALK5		= 3.06e-2;   
   ARO1		= 1.18e-2;
   ARO2		= 8.74e-3;
   OLE1		= 1.04e-2;
   OLE2		= 7.97e-3;   

#INLINE F90_INIT
        TSTART = 0.0d0*60.0d0
        TEND   = TSTART + 2160.0d0*60.0d0
        DT     = 30.0d0*60.d0
        TEMP   = 320.0d0
#ENDINLINE   
     
