source: branches/2017/dev_v3.20_2017_transport_max/SOURCES/source_3.20/const.com

Last change on this file was 6, checked in by vancop, 8 years ago

initial import of v3.20 /Users/ioulianikolskaia/Boulot/CODES/LIM1D/ARCHIVE/TMP/LIM1D_v3.20/
File size: 429 bytes
Line 
1
2!
3!               COMMONS FOR XXXX
4!               ===================================
5!
6!       further cleaning required
7!
8
9      REAL(8) :: rlat  !keep
10 
11      COMMON / iteration /
12     &   numit,
13     &   rlat,
14     &   year, ! (useful?)
15     &   day, ! (useful ?)
16     &   nstart,
17     &   nend,
18     &   nitrun,
19     &   num_d,
20     &   nyear
21 
22      COMMON / cstfix /
23     &  c_zero, one, pi, radian,
24     &  yeaday, gpes, rho0,
25     &  iyea_num
Note: See TracBrowser for help on using the repository browser.