|
Last change
on this file since 779 was
778,
checked in by slebonnois, 13 years ago
|
|
SL: bug correction for a file specific to Venus and Titan, + Venus gravity waves routine update (work still in progress)
|
|
File size:
492 bytes
|
| Line | |
|---|
| 1 | ! ----------------------------------------------------------------- |
|---|
| 2 | !* *COMMON* *YOEGWD* - PARAMETERS FOR GRAVITY WAVE DRAG CALCULATIONS |
|---|
| 3 | ! ----------------------------------------------------------------- |
|---|
| 4 | ! |
|---|
| 5 | integer :: NKTOPG,NTOP |
|---|
| 6 | real :: GFRCRIT,GKWAKE,GRCRIT,GVCRIT,GKDRAG,GKLIFT |
|---|
| 7 | real :: GHMAX,GRAHILO,GSIGCR,GSSEC,GTSEC,GVSEC |
|---|
| 8 | COMMON/YOEGWD/ GFRCRIT,GKWAKE,GRCRIT,GVCRIT,GKDRAG,GKLIFT & |
|---|
| 9 | ,GHMAX,GRAHILO,GSIGCR,NKTOPG,NTOP,GSSEC,GTSEC,GVSEC |
|---|
| 10 | |
|---|
Note: See
TracBrowser
for help on using the repository browser.
