78 |
_RL SaltPlumeDepth (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL SaltPlumeDepth (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
79 |
_RL saltPlumeFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL saltPlumeFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
80 |
#ifdef SALT_PLUME_VOLUME |
#ifdef SALT_PLUME_VOLUME |
81 |
C _RL SPbrineVolFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL SPbrineVolFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
82 |
_RL dSPvolSurf2kLev (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL dSPvolSurf2kLev (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
83 |
& ,dSPvolkLev2Above(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1,nSx,nSy) |
& ,dSPvolkLev2Above(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1,nSx,nSy) |
|
& ,SPplumek (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1,nSx,nSy) |
|
84 |
& ,SPforcingS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
& ,SPforcingS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
85 |
& ,SPforcingT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
& ,SPforcingT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
86 |
|
C & ,SPplumek (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr+1,nSx,nSy) |
87 |
#endif /* SALT_PLUME_VOLUME */ |
#endif /* SALT_PLUME_VOLUME */ |
88 |
COMMON /DYNVARS_SALT_PLUME/ SaltPlumeDepth |
COMMON /DYNVARS_SALT_PLUME/ SaltPlumeDepth |
89 |
#ifdef SALT_PLUME_VOLUME |
#ifdef SALT_PLUME_VOLUME |
90 |
CCCC & ,SPbrineVolFlux |
& ,SPbrineVolFlux |
91 |
COMMON /FFIELDS_SaltPlumeVol/ |
COMMON /FFIELDS_SaltPlumeVol/ |
92 |
& dSPvolSurf2kLev,dSPvolkLev2Above,SPplumek, |
& dSPvolSurf2kLev,dSPvolkLev2Above, |
93 |
& SPforcingS,SPforcingT |
& SPforcingS,SPforcingT |
94 |
|
C & ,SPplumek |
95 |
#endif /* SALT_PLUME_VOLUME */ |
#endif /* SALT_PLUME_VOLUME */ |
96 |
COMMON /FFIELDS_saltPlumeFlux/ saltPlumeFlux |
COMMON /FFIELDS_saltPlumeFlux/ saltPlumeFlux |
97 |
#endif /* ALLOW_SALT_PLUME */ |
#endif /* ALLOW_SALT_PLUME */ |