source: palm/trunk/UTIL/chemistry/gasphase_preproc/kpp/int/atm_lsodes.def @ 2718

Last change on this file since 2718 was 2696, checked in by kanani, 7 years ago

Merge of branch palm4u into trunk

File size: 257 bytes
Line 
1 
2#FUNCTION AGGREGATE
3#JACOBIAN FULL
4#DOUBLE ON
5#INTFILE atm_lsodes
6
7#INLINE F77_GLOBAL
8      REAL*8 STEPSTART
9      COMMON /GDATA/ STEPSTART
10#ENDINLINE
11
12#INLINE F77_INIT
13        STEPMIN=1.D-12
14        STEPMAX=3600.
15        STEPSTART=STEPMIN
16#ENDINLINE
17
18
19
Note: See TracBrowser for help on using the repository browser.