Last change
on this file since 1009 was
517,
checked in by emillour, 13 years ago
|
Mars GCM: Adding the new molecular diffusion routines (old "moldiff" and "moldiffcoeff" are kept for now and if further tests are needed) by JYC:
moldiffcoeff_red.F, moldiff_red.F90, diffusion.h
Also updated "phymars/comdiurn.h", "aeronomars/conc.h" and "aeronomars/chimiedata.h" to be fixed/free form compatible.
|
File size:
212 bytes
|
Rev | Line | |
---|
[517] | 1 | COMMON/comdiurn_r/sinlon(ngridmx),coslon(ngridmx), & |
---|
| 2 | & sinlat(ngridmx),coslat(ngridmx) |
---|
[340] | 3 | COMMON/comdiurn_l/ldiurn |
---|
| 4 | |
---|
[38] | 5 | REAL sinlon,coslon,sinlat,coslat |
---|
| 6 | LOGICAL ldiurn |
---|
Note: See
TracBrowser
for help on using the repository browser.