Merge remote-tracking branch 'origin/release-v4.6.1'
[WRF.git] / chem / KPP / kpp / kpp-2.1 / test / saprc99.def
blob35f6d4f2287eafacf581d7f5b42603dc9575ad0f
1 #include saprc99.spc
2 #include saprc99.eqn
5 {#LANGUAGE Fortran77
6 #INTEGRATOR rodas3
7 #DRIVER matlab
8 #HESSIAN ON}
10 #LANGUAGE Fortran90
12 #LOOKATALL
14 #MONITOR O3; NO; NO2; ETHENE;
16 #INITVALUES
18 CFACTOR = 2.4476e+13;
20 ALL_SPEC = 0.0e0;
21 NO = 1.0e-1;
22 NO2 = 5.0e-2;
23 HONO = 1.e-3;
24 SO2 = 5.e-2;
25 HCHO = 1.121e-2;
26 CCHO = 2.316e-3;
27 RCHO = 1.72e-3;
28 ACET = 5.07e-3;
29 MEK = 3.26e-3;
30 MEOH = 5.89e-3;
31 GLY = 1.21e-4;
32 MGLY = 8.37e-5;
33 PHEN = 6.06e-4;
34 CRES = 5.60e-4;
35 BALD = 7.51e-5;
36 METHACRO = 1.30e-3;
37 ISOPROD = 8.93e-5;
38 PROD2 = 1.93e-3;
39 ETHENE = 1.89e-2;
40 ISOPRENE = 4.33e-4;
41 ALK1 = 1.167e-2;
42 ALK2 = 1.88e-2;
43 ALK3 = 4.69e-2;
44 ALK4 = 4.17e-2;
45 ALK5 = 3.06e-2;
46 ARO1 = 1.18e-2;
47 ARO2 = 8.74e-3;
48 OLE1 = 1.04e-2;
49 OLE2 = 7.97e-3;
50 TERP = 8.20e-4;
51 XC = 0.2E0;
52 CCO_OH = 1.16e-3;
53 RCO_OH = 3.92e-4;
54 HCOOH = 6.77e-4;
55 O3P = 7.843e-9;
56 H2O = 2.0e+04;
57 O2 = 2.09e+5;
58 AIR = 1.0e+6;
59 CH4 = 1.0e0;
61 #INLINE F77_INIT
62 TSTART = 12.0D0*3600.0D0
63 TEND = TSTART + 120.0D0*3600.0D0
64 DT = 3600.D0
65 TEMP = 300.0D0
66 #ENDINLINE
68 #INLINE F90_INIT
69 TSTART = 12.0d0*3600.0d0
70 TEND = TSTART + 120.0d0*3600.0d0
71 DT = 3600.d0
72 TEMP = 300.0d0
73 #ENDINLINE
75 #INLINE MATLAB_INIT
76 global TSTART TEND DT TEMP
77 TSTART = 12*3600;
78 TEND = TSTART + 120*3600;
79 DT = 3600;
80 TEMP = 300;
81 #ENDINLINE
83 #INLINE C_INIT
84 TSTART = 12.0*3600.0;
85 TEND = TSTART + 120.0*3600.0;
86 DT = 3600.0;
87 TEMP = 300.0;
88 #ENDINLINE