| 1 |
#ifdef ALLOW_OFFLINE |
| 2 |
c !ROUTINE: OFFLINE.h |
| 3 |
c ------------------------------- |
| 4 |
c OFFLINE.h |
| 5 |
C variable for forcing offline tracer |
| 6 |
c ------------------------------- |
| 7 |
|
| 8 |
c Forcing files |
| 9 |
COMMON /OFFLINE_FFIELDS/ |
| 10 |
& ConvectCount, |
| 11 |
& UvelFile, VvelFile, WvelFile, ThetFile, Saltfile, |
| 12 |
& ConvFile, GMwxFile, GMwyFile, GMwzFile, |
| 13 |
& HfluxFile, SfluxFile, |
| 14 |
& KPP_DiffSFile, KPP_ghatFile, |
| 15 |
& deltaToffline, |
| 16 |
& offlineIter0, offlineOffsetIter, |
| 17 |
& offlineForcingPeriod, offlineForcingCycle |
| 18 |
_RS ConvectCount(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy) |
| 19 |
CHARACTER*(MAX_LEN_FNAM) UvelFile |
| 20 |
CHARACTER*(MAX_LEN_FNAM) VvelFile |
| 21 |
CHARACTER*(MAX_LEN_FNAM) WvelFile |
| 22 |
CHARACTER*(MAX_LEN_FNAM) ConvFile |
| 23 |
CHARACTER*(MAX_LEN_FNAM) ThetFile |
| 24 |
CHARACTER*(MAX_LEN_FNAM) SaltFile |
| 25 |
CHARACTER*(MAX_LEN_FNAM) GMwxFile |
| 26 |
CHARACTER*(MAX_LEN_FNAM) GMwyFile |
| 27 |
CHARACTER*(MAX_LEN_FNAM) GMwzFile |
| 28 |
CHARACTER*(MAX_LEN_FNAM) HFluxFile |
| 29 |
CHARACTER*(MAX_LEN_FNAM) SFluxFile |
| 30 |
CHARACTER*(MAX_LEN_FNAM) KPP_DiffSFile |
| 31 |
CHARACTER*(MAX_LEN_FNAM) KPP_ghatFile |
| 32 |
INTEGER offlineIter0 |
| 33 |
INTEGER offlineOffsetIter |
| 34 |
_RL deltaToffline |
| 35 |
_RL offlineForcingPeriod |
| 36 |
_RL offlineForcingCycle |
| 37 |
|
| 38 |
#endif /* ALLOW_OFFLINE*/ |
| 39 |
|
| 40 |
|
Parent Directory
| 
Revision Log
| 
Revision Graph