|
Last change
on this file since 1593 was
1593,
checked in by emillour, 8 years ago
|
|
Common dynamics:
- some cleanup around unused or unecessary parameters in the dynamics (ecritphy, grireg and physic) to harmonize with LMDZ5 (Earth dyn core).
- associated changes in LMDZ.MARS and LMDZ.GENERIC
EM
|
|
File size:
706 bytes
|
| Line | |
|---|
| 1 | |
|---|
| 2 | module control_mod |
|---|
| 3 | |
|---|
| 4 | implicit none |
|---|
| 5 | |
|---|
| 6 | integer,save :: nday ! # of days to run |
|---|
| 7 | integer,save :: day_step ! # of dynamical time steps per day |
|---|
| 8 | integer,save :: iperiod ! make a Matsuno step before avery iperiod-1 LF steps |
|---|
| 9 | integer,save :: iconser ! |
|---|
| 10 | integer,save :: idissip ! apply dissipation every idissip dynamical step |
|---|
| 11 | integer,save :: iphysiq ! call physics every iphysiq dynamical steps |
|---|
| 12 | integer,save :: anneeref ! reference year # ! not used |
|---|
| 13 | real,save :: periodav |
|---|
| 14 | ! integer,save :: ecritphy ! output data in "diagfi.nc" every ecritphy dynamical steps |
|---|
| 15 | character(len=10),save :: planet_type ! planet type ('earth','mars',...) |
|---|
| 16 | character(len=4),save :: config_inca |
|---|
| 17 | |
|---|
| 18 | end module control_mod |
|---|
Note: See
TracBrowser
for help on using the repository browser.
