source:
palm/tags/release-5.0/UTIL/chemistry/gasphase_preproc/kpp/int.modified_WCOPY/sdirk.def
@
3648
Last change on this file since 3648 was 2696, checked in by kanani, 7 years ago | |
---|---|
File size: 262 bytes |
Line | |
---|---|
1 | |
2 | #FUNCTION AGGREGATE |
3 | #JACOBIAN SPARSE_LU_ROW |
4 | |
5 | #DOUBLE ON |
6 | #INTFILE sdirk |
7 | |
8 | #INLINE F77_GLOBAL |
9 | REAL*8 STEPSTART |
10 | COMMON /GDATA/ STEPSTART |
11 | #ENDINLINE |
12 | |
13 | #INLINE F77_INIT |
14 | STEPMIN=0.0001 |
15 | STEPMAX=3600. |
16 | STEPSTART=STEPMIN |
17 | #ENDINLINE |
18 | |
19 | |
20 |
Note: See TracBrowser
for help on using the repository browser.