1 |
|
C $Header$ |
2 |
|
C $Name$ |
3 |
C |
C |
4 |
C-- 98/06/12 - elk |
C-- 98/06/12 - elk |
5 |
C |
C |
23 |
COMMON /DYNVARS_A/ |
COMMON /DYNVARS_A/ |
24 |
& uVeltave,vVeltave,thetatave,salttave, |
& uVeltave,vVeltave,thetatave,salttave, |
25 |
& uttave,vttave,k13tave,k23tave,wVeltave, |
& uttave,vttave,k13tave,k23tave,wVeltave, |
26 |
& KapGMtave |
& KapGMtave,ConvectCountTave |
27 |
_RL uVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL uVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
28 |
_RL vVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL vVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
29 |
_RL thetatave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL thetatave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
34 |
_RL k23tave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL k23tave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
35 |
_RL wVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL wVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
36 |
_RL KapGMtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL KapGMtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
37 |
|
_RL ConvectCountTave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |