repo.or.cz
/
WRF.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Merge remote-tracking branch 'origin/release-v4.6.1'
[WRF.git]
/
chem
/
KPP
/
kpp
/
kpp-2.1
/
test
/
smog.def
blob
a35a2cc84d71395704cce62b6fa8cab6009503aa
1
#include smog.spc
2
#include smog.eqn
3
4
{
#LANGUAGE Fortran77
5
#INTEGRATOR rodas3
6
#DRIVER general
}
7
8
#LOOKATALL
9
#MONITOR O3
;
10
11
#INITVALUES
12
13
CFACTOR
=
1
.
;
14
ALL_SPEC
=
1.0E-8
;
15
RH
=
2.0
;
16
RCHO
=
2.0
;
17
NO
=
0.5
;
18
NO2
=
0.1
;
19
H2O
=
1.3E+4
;
20
O2
=
2.0E+5
;
21
22
#INLINE F77_INIT
23
TSTART
=
0
24
TEND
=
TSTART
+
600
25
DT
=
60.0
26
TEMP
=
298
27
#ENDINLINE
28
29
#INLINE F90_INIT
30
TSTART
=
0
31
TEND
=
TSTART
+
600
32
DT
=
60.0
33
TEMP
=
298
34
#ENDINLINE
35
36
#INLINE MATLAB_INIT
37
global TSTART TEND DT TEMP
38
TSTART
=
0
;
39
TEND
=
TSTART
+
600
;
40
DT
=
60.0
;
41
TEMP
=
298
;
42
#ENDINLINE
43
44
#INLINE C_INIT
45
TSTART
=
0
;
46
TEND
=
TSTART
+
600
;
47
DT
=
60.0
;
48
TEMP
=
298
;
49
#ENDINLINE