1 |
C $Header: /u/gcmpack/MITgcm/pkg/salt_plume/SALT_PLUME.h,v 1.3 2007/11/28 17:55:36 dimitri Exp $ |
2 |
C $Name: $ |
3 |
|
4 |
#ifdef ALLOW_SALT_PLUME |
5 |
|
6 |
C-- SALT_PLUME parameters |
7 |
C Find surface where the potential density (ref.lev=surface) is |
8 |
C larger than surface density plus SaltPlumeCriterion. |
9 |
|
10 |
C CriterionType: 1=delta_rho, 2=drhodz, default is 1 |
11 |
C Plume_Method: method of distributing salt plume vertically |
12 |
C 1=uniform, 2=exp, 3=overshoot, 4=power, 5=dump_at_top, 6=reverse of 4 |
13 |
C default is 1 |
14 |
C Npower: choices of distributing salt uniformly (0), linear (1), |
15 |
C or higher power (Npower>1); default is 0 |
16 |
INTEGER CriterionType, PlumeMethod, Npower |
17 |
COMMON /SALT_PLUME_PARAMS_I/ CriterionType, PlumeMethod, Npower |
18 |
|
19 |
C SaltPlumeCriterion |
20 |
C for CriterionType=1, default is 0.4 kg/m^3 of Duffy et al 1999 |
21 |
C for CriterionType=2, default is 0.005 kg/m^3/m |
22 |
C SPovershoot: overshooting depth of penetrating salt plume, |
23 |
C so that 1.0 = no-overshoot, 1.2 = 20% overshoot. |
24 |
C default is 1.0 |
25 |
_RL SaltPlumeCriterion, SPovershoot |
26 |
COMMON /SALT_PLUME_PARAMS_R/ SaltPlumeCriterion, SPovershoot |
27 |
|
28 |
C-- SALT_PLUME 2-dim. fields |
29 |
C SaltPlumeDepth :: depth of penetration of salt plumes |
30 |
C rejected during sea ice growth |
31 |
C saltPlumeFlux :: Net downward salt flux in psu.kg/m^2/s |
32 |
C Note: a) only used when salty sea-ice forms. |
33 |
C b) units: when salinity (unit= psu) is expressed |
34 |
C in g/kg, saltPlumeFlux unit becomes g/m^2/s. |
35 |
C > 0 for increasing in SSS. |
36 |
C Southwest C-grid tracer point |
37 |
_RL SaltPlumeDepth (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
38 |
_RL saltPlumeFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
39 |
COMMON /DYNVARS_SALT_PLUME/ SaltPlumeDepth |
40 |
COMMON /FFIELDS_saltPlumeFlux/ saltPlumeFlux |
41 |
|
42 |
#endif /* ALLOW_SALT_PLUME */ |