16 |
C----------------------------------------------------------------------- |
C----------------------------------------------------------------------- |
17 |
C |
C |
18 |
C-- Constants that can be set in data.shelfice |
C-- Constants that can be set in data.shelfice |
19 |
|
C SHELFICEloadAnomalyFile - name of shelfice load anomaly file |
20 |
C SHELFICEDragLinear - linear drag at bottom shelfice (1/s) |
C SHELFICEDragLinear - linear drag at bottom shelfice (1/s) |
21 |
C SHELFICEDragQuadratic - quadratic drag at bottom shelfice (1/m) |
C SHELFICEDragQuadratic - quadratic drag at bottom shelfice (1/m) |
22 |
C SHELFICEexchangeVelocity - scale parameter that determines heat flux |
C SHELFICEexchangeVelocity - scale parameter that determines heat flux |
32 |
C SHELFICE_taveFreq - analoguous to taveFreq (= default) |
C SHELFICE_taveFreq - analoguous to taveFreq (= default) |
33 |
C |
C |
34 |
C-- Fields |
C-- Fields |
35 |
C ktopC - index of the top "wet cell" (2D) |
C ktopC - index of the top "wet cell" (2D) |
36 |
|
C R_shelfIce - shelfice topography [m] |
37 |
|
C shelficeLoadAnomaly - pressure load anomaly of shelfice [Pa] |
38 |
|
C shelficeHeatFlux - upward heat flux [W/m^2] |
39 |
|
C shelficeFreshWaterFlux - upward fresh water flux (virt. salt flux) [m/s] |
40 |
|
C shelficeForcingT - analogue of surfaceForcingT |
41 |
|
C shelficeForcingS - analogue of surfaceForcingS |
42 |
C----------------------------------------------------------------------- |
C----------------------------------------------------------------------- |
43 |
C \ev |
C \ev |
44 |
CEOP |
CEOP |
66 |
|
|
67 |
COMMON /SHELFICE_FIELDS_RS/ |
COMMON /SHELFICE_FIELDS_RS/ |
68 |
& R_shelfIce, |
& R_shelfIce, |
69 |
|
& shelficeLoadAnomaly, |
70 |
& shelficeHeatFlux, |
& shelficeHeatFlux, |
71 |
& shelfIceFreshWaterFlux |
& shelfIceFreshWaterFlux |
72 |
_RS R_shelfIce (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS R_shelfIce (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
73 |
|
_RS shelficeLoadAnomaly (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
74 |
_RS shelficeHeatFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS shelficeHeatFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
75 |
_RS shelficeFreshWaterFlux(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS shelficeFreshWaterFlux(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
76 |
|
|
92 |
& SHELFICE_dump_mnc, |
& SHELFICE_dump_mnc, |
93 |
& SHELFICE_tave_mnc |
& SHELFICE_tave_mnc |
94 |
|
|
95 |
|
CHARACTER*(MAX_LEN_FNAM) SHELFICEloadAnomalyFile |
96 |
|
COMMON /SHELFICE_PARM_C/ |
97 |
|
& SHELFICEloadAnomalyFile |
98 |
|
|
99 |
#endif /* ALLOW_SHELFICE */ |
#endif /* ALLOW_SHELFICE */ |