21 |
COMMON /SEAICE_TAVE_VARS/ |
COMMON /SEAICE_TAVE_VARS/ |
22 |
& SEAICE_timeAve, |
& SEAICE_timeAve, |
23 |
& FUtave, FVtave, EmPmRtave, QNETtave, QSWtave, |
& FUtave, FVtave, EmPmRtave, QNETtave, QSWtave, |
|
#ifdef SEAICE_ITD |
|
|
& UICEtave, VICEtave, HEFFtave, AREAtave, |
|
|
& HEFFITDtave, AREAITDtave |
|
|
#else |
|
24 |
& UICEtave, VICEtave, HEFFtave, AREAtave |
& UICEtave, VICEtave, HEFFtave, AREAtave |
|
#endif |
|
25 |
|
|
26 |
_RL SEAICE_timeAve(nSx,nSy) |
_RL SEAICE_timeAve(nSx,nSy) |
27 |
_RL FUtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL FUtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
33 |
_RL VICEtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL VICEtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
34 |
_RL HEFFtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL HEFFtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
35 |
_RL AREAtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL AREAtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
36 |
|
|
37 |
#ifdef SEAICE_ITD |
#ifdef SEAICE_ITD |
38 |
|
COMMON /SEAICE_TAVE_VARS_ITD/ |
39 |
|
& HEFFITDtave, AREAITDtave |
40 |
_RL HEFFITDtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nITD,nSx,nSy) |
_RL HEFFITDtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nITD,nSx,nSy) |
41 |
_RL AREAITDtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nITD,nSx,nSy) |
_RL AREAITDtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nITD,nSx,nSy) |
42 |
#endif |
#endif |