source: codes/icosagcm/trunk/src/icosa_mod.f90 @ 347

Last change on this file since 347 was 347, checked in by dubos, 9 years ago

Synced with aquaplanet branch HEAT@45 - tested with DCMIP4

File size: 420 bytes
RevLine 
[19]1MODULE icosa
2
3  USE genmod
[186]4!  USE ioipsl, ONLY : getin
5  USE getin_mod, ONLY : getin
[19]6  USE grid_param
7  USE metric
8  USE domain_mod
9  USE dimensions
10  USE grid_param
11  USE geometry
12  USE spherical_geom_mod
13  USE vector
14  USE field_mod
[347]15  USE write_field_mod
[19]16  USE transfert_mod
[82]17  USE time_mod
[19]18 
[25]19  ! Variables defined by run.def
20
21  REAL(rstd) :: ncar_dz, ncar_p0, ncar_T0 ! read from run.def by disvert
22
[19]23END MODULE icosa
Note: See TracBrowser for help on using the repository browser.