|
Last change
on this file was
3857,
checked in by ikovalenko, 11 days ago
|
|
Venus PCM:
Replaced comcstfi.h by comcstfi_mod.F90.
IK
|
|
File size:
400 bytes
|
| Line | |
|---|
| 1 | !----------------------------------------------------------------------- |
|---|
| 2 | ! INCLUDE comcstfi.h |
|---|
| 3 | ! |
|---|
| 4 | ! COMMON/comcstfi/rad,g,r,rcp,dtphys,daysec,mugaz,omeg |
|---|
| 5 | ! |
|---|
| 6 | ! REAL rad,g,r,rcp,dtphys,daysec,mugaz,omeg |
|---|
| 7 | ! |
|---|
| 8 | !----------------------------------------------------------------------- |
|---|
| 9 | MODULE comcstfi_mod |
|---|
| 10 | IMPLICIT NONE |
|---|
| 11 | REAL, SAVE :: rad, g, r, rcp, dtphys, daysec, mugaz, omeg |
|---|
| 12 | END MODULE comcstfi_mod |
|---|
Note: See
TracBrowser
for help on using the repository browser.
