pkg/salt_plume/SALT_PLUME.h

C $Header: /u/gcmpack/MITgcm/pkg/salt_plume/SALT_PLUME.h,v 1.4 2007/12/18 05:34:41 dimitri Exp $
C $Name:  $

#ifdef ALLOW_SALT_PLUME

C--   SALT_PLUME parameters
C     Find surface where the potential density (ref.lev=surface) is
C     larger than surface density plus SaltPlumeCriterion.

C     CriterionType: 1=delta_rho, 2=drhodz, default is 1
C     PlumeMethod: method of distributing salt plume vertically
C       1=power, 2=exp, 3=overshoot, 5=dump_at_top, 6=reverse of 1
C       default is 1
C     Npower: choices of distributing salt uniformly (0), linear (1),
C       or higher power (Npower>1); default is 0 when PlumeMethod = 1
      INTEGER CriterionType, PlumeMethod, Npower
      COMMON /SALT_PLUME_PARAMS_I/ CriterionType, PlumeMethod, Npower

C     SaltPlumeCriterion
C       for CriterionType=1, default is 0.4 kg/m^3 of Duffy et al 1999
C       for CriterionType=2, default is 0.005 kg/m^3/m
C     SPovershoot: overshooting depth of penetrating salt plume,
C       so that 1.0 = no-overshoot, 1.2 = 20% overshoot.
C       default is 1.0
      _RL SaltPlumeCriterion, SPovershoot
      COMMON /SALT_PLUME_PARAMS_R/ SaltPlumeCriterion, SPovershoot

C--   SALT_PLUME 2-dim. fields
C     SaltPlumeDepth :: depth of penetration of salt plumes
C                       rejected during sea ice growth
C     saltPlumeFlux :: Net downward salt flux in psu.kg/m^2/s
C              Note: a) only used when salty sea-ice forms.
C                    b) units: when salinity (unit= psu) is expressed
C                       in g/kg, saltPlumeFlux unit becomes g/m^2/s.
C              > 0 for increasing in SSS.
C              Southwest C-grid tracer point
      _RL SaltPlumeDepth (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
      _RL  saltPlumeFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
      COMMON /DYNVARS_SALT_PLUME/ SaltPlumeDepth
      COMMON /FFIELDS_saltPlumeFlux/ saltPlumeFlux

#endif /* ALLOW_SALT_PLUME */
1	C $Header: /u/gcmpack/MITgcm/pkg/salt_plume/SALT_PLUME.h,v 1.4 2007/12/18 05:34:41 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 PlumeMethod: method of distributing salt plume vertically
12	C 1=power, 2=exp, 3=overshoot, 5=dump_at_top, 6=reverse of 1
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 when PlumeMethod = 1
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 */