|
Last change
on this file since 1671 was
1671,
checked in by Ehouarn Millour, 12 years ago
|
- fixed "aquaplanet case" so that initializations (creation of
files startphy.nc and limit.nc) now also works in parallel (mpi,omp,mixed).
- call to "iniaqua" is now done from within "iniphysiq" ; also added
some tests to check consistency between essential variables shared by
dynamics and physics (planetary radius, gravity, Cp, ...)
- simillarily adapted "phydev" routines, and added necessary routines to also
be able to generate startphy.nc/restartphy.nc files there. Also removed
common file "comcstphy.h" and replaced it with a module "comcstphy.F90"
EM
|
|
File size:
222 bytes
|
| Line | |
|---|
| 1 | module comcstphy |
|---|
| 2 | |
|---|
| 3 | real :: rradius ! planet radius (m) |
|---|
| 4 | real :: rr ! recuced gas constant: R/molar mass of atm |
|---|
| 5 | real :: rg ! gravity |
|---|
| 6 | real :: rcpp ! specific heat of the atmosphere |
|---|
| 7 | |
|---|
| 8 | end module comcstphy |
|---|
Note: See
TracBrowser
for help on using the repository browser.
