/[MITgcm]/MITgcm_contrib/MPMice/beaufort/code/CPL_MPMICE.h
ViewVC logotype

Diff of /MITgcm_contrib/MPMice/beaufort/code/CPL_MPMICE.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.1 by dimitri, Sun May 31 03:41:36 2009 UTC revision 1.6 by dimitri, Thu Oct 2 22:02:55 2014 UTC
# Line 19  Line 19 
19  !     OceanGridsizeTag  !     OceanGridsizeTag
20  !     ocean model Nx and Ny dimensions: 2 integers  !     ocean model Nx and Ny dimensions: 2 integers
21    
22    !     xCtag
23    !     longitude East of center of grid cell
24    !     Nx * Ny Real*8 array
25    
26    !     yCtag
27    !     latitude North of center of grid cell
28    !     Nx * Ny Real*8 array
29    
30    !     xGtag
31    !     longitude East of SouthWest corner
32    !     Nx * Ny Real*8 array
33    
34    !     yGtag
35    !     latitude North of SouthWest corner
36    !     Nx * Ny Real*8 array
37    
38    !     dxGtag
39    !     distance in m between SouthWest and SouthEast corner
40    !     Nx * Ny Real*8 array
41    
42    !     dyGtag
43    !     distance in m between SouthWest and NorthEast corner
44    !     Nx * Ny Real*8 array
45    
46    !     aCStag
47    !     cosine(alpha) relative to geographic direction at grid cell center
48    !     Nx * Ny Real*8 array
49    
50    !     aSNtag
51    !     sine(alpha) relative to geographic direction at grid cell center
52    !     Nx * Ny Real*8 array
53    
54    !     hFacCtag
55    !     landmask of center of grid cell, 0 is land, >0 is ocean
56    !     Nx * Ny Real*8 array
57    
58  !     AreaBcTag  !     AreaBcTag
59  !     open boundary ice area (fractional: 0-1) at the tracer points  !     open boundary ice area (fractional: 0-1) at the tracer points
60  !     2*(Nx+Ny)-4 Real*8 array  !     2*(Nx+Ny)-4 Real*8 array
# Line 26  Line 62 
62  !     j=[ones(1,Nx) 2:Ny            Ny*ones(1,Nx-1) (Ny-1):-1:2 ];  !     j=[ones(1,Nx) 2:Ny            Ny*ones(1,Nx-1) (Ny-1):-1:2 ];
63    
64  !     HeffBcTag  !     HeffBcTag
65  !     open boundary effective ice thickness (m)  !     open boundary effective ice thickness (m) at the tracer points
66  !     actual thickness for single-class ice would be thickness/area  !     actual ice thickness for single-class ice is: Heff / Area
 !     at the tracer points  
67  !     2*(Nx+Ny)-4 Real*8 array  !     2*(Nx+Ny)-4 Real*8 array
68  !     i=[1:Nx       Nx*ones(1,Ny-1) (Nx-1):-1:1     ones(1,Ny-2)];  !     i=[1:Nx       Nx*ones(1,Ny-1) (Nx-1):-1:1     ones(1,Ny-2)];
69  !     j=[ones(1,Nx) 2:Ny            Ny*ones(1,Nx-1) (Ny-1):-1:2 ];  !     j=[ones(1,Nx) 2:Ny            Ny*ones(1,Nx-1) (Ny-1):-1:2 ];
70    
71  !     HsnowBcTag  !     HsnowBcTag
72  !     open boundary effective snow thickness (m)  !     open boundary effective snow thickness (m) at the tracer points
73  !     actual thickness for single-class snow would be thickness/area  !     actual snow thickness is: Hsnow / Area
 !     at the tracer points  
74  !     2*(Nx+Ny)-4 Real*8 array  !     2*(Nx+Ny)-4 Real*8 array
75  !     i=[1:Nx       Nx*ones(1,Ny-1) (Nx-1):-1:1     ones(1,Ny-2)];  !     i=[1:Nx       Nx*ones(1,Ny-1) (Nx-1):-1:1     ones(1,Ny-2)];
76  !     j=[ones(1,Nx) 2:Ny            Ny*ones(1,Nx-1) (Ny-1):-1:2 ];  !     j=[ones(1,Nx) 2:Ny            Ny*ones(1,Nx-1) (Ny-1):-1:2 ];
77    
78  !     HsaltBcTag  !     HsaltBcTag
79  !     open boundary effective sea ice salinity (g/m2)  !     open boundary effective sea ice salinity (g/m2) at the tracer points
80  !     at the tracer points  !     actual salinity in g/kg is: Hsalt / Heff / rhoIce
81    !     where rhoice = 910 kg / m^3
82  !     2*(Nx+Ny)-4 Real*8 array  !     2*(Nx+Ny)-4 Real*8 array
83  !     i=[1:Nx       Nx*ones(1,Ny-1) (Nx-1):-1:1     ones(1,Ny-2)];  !     i=[1:Nx       Nx*ones(1,Ny-1) (Nx-1):-1:1     ones(1,Ny-2)];
84  !     j=[ones(1,Nx) 2:Ny            Ny*ones(1,Nx-1) (Ny-1):-1:2 ];  !     j=[ones(1,Nx) 2:Ny            Ny*ones(1,Nx-1) (Ny-1):-1:2 ];
# Line 74  Line 109 
109    
110  !     HeffTag  !     HeffTag
111  !     effective ice thickness (mean thickness in the grid box in m)  !     effective ice thickness (mean thickness in the grid box in m)
 !     actual thickness for single-class ice would be thickness/area  
112  !     at the tracer points  !     at the tracer points
113    !     actual ice thickness for single-class ice is: Heff / Area
114  !     Nx * Ny Real*8 array  !     Nx * Ny Real*8 array
115    
116  !     HsnowTag  !     HsnowTag
117  !     effective snow thickness (mean thickness in the grid box in m)  !     effective snow thickness (mean thickness in the grid box in m)
 !     actual thickness for single-class snow would be thickness/area  
118  !     at the tracer points  !     at the tracer points
119    !     actual snow thickness is: Hsnow / Area
120  !     Nx * Ny Real*8 array  !     Nx * Ny Real*8 array
121    
122  !     HsaltTag  !     HsaltTag
123  !     effective sea ice salinity (g/m2)  !     effective sea ice salinity (g/m2) at the tracer points
124  !     at the tracer points  !     actual salinity in g/kg is: Hsalt / Heff / rhoIce
125    !     where rhoice = 910 kg / m^3
126    !     Nx * Ny Real*8 array
127    
128    !     UiceTag
129    !     zonal ice velocity in m/s at South-West C-grid U point
130    !     >0 from West to East
131    !     Nx * Ny Real*8 array
132    
133    !     ViceTag
134    !     meridional ice velocity in m/s at South-West C-grid V point
135    !     >0 from South to North
136  !     Nx * Ny Real*8 array  !     Nx * Ny Real*8 array
137    
138  !     UwindTag  !     UwindTag
# Line 126  Line 172 
172  !     sea surface temperature at the tracer points (deg C)  !     sea surface temperature at the tracer points (deg C)
173  !     Nx * Ny Real*8 array  !     Nx * Ny Real*8 array
174    
175    !     SssTag
176    !     sea surface salinity at the tracer points (g/kg)
177    !     Nx * Ny Real*8 array
178    
179  !     UvelTag  !     UvelTag
180  !     sea surface zonal velocity (m/s)  !     sea surface zonal velocity (m/s)
181  !     at southwest c-grid locations  !     at southwest c-grid locations
# Line 138  Line 188 
188    
189  !     UstressTag  !     UstressTag
190  !     zonal stress under ice at southwest c-grid locations (N/m^2)  !     zonal stress under ice at southwest c-grid locations (N/m^2)
191    !     Ustress is computed for ice-covered area only
192    !     > 0 increases ocean surface velocity in the U direction
193  !     Nx * Ny Real*8 array  !     Nx * Ny Real*8 array
194    
195  !     VstressTag  !     VstressTag
196  !     meridional stress under ice at southwest c-grid locations (N/m^2)  !     meridional stress under ice at southwest c-grid locations (N/m^2)
197    !     Vstress is computed for ice-covered area only
198    !     > 0 increases ocean surface velocity in the V direction
199  !     Nx * Ny Real*8 array  !     Nx * Ny Real*8 array
200    
201  !     SwResidTag  !     SwResidTag
202  !     residual shortwave under ice at tracer point (W/m2)  !     residual shortwave under ice at tracer point (W/m2)
203    !     SwResid is computed for ice-covered area only
204  !     > 0 for increase in theta (ocean warming)  !     > 0 for increase in theta (ocean warming)
205  !     Nx * Ny Real*8 array  !     Nx * Ny Real*8 array
206    
207  !     HeatFluxTag  !     HeatFluxTag
208  !     heat flux (less shortwave) at tracer point (W/m2)  !     heat flux (less shortwave) at tracer point (W/m2)
209    !     HeatFlux is computed for ice-covered area only
210  !     > 0 for increase in theta (ocean warming)  !     > 0 for increase in theta (ocean warming)
211  !     Nx * Ny Real*8 array  !     Nx * Ny Real*8 array
212    
213  !     WaterFluxTag  !     WaterFluxTag
214  !     freshwater flux at tracer point (m/s)  !     freshwater flux at tracer point ( kg/m^2/s )
215    !     WaterFlux is computed for ice-covered area only
216  !     > 0 for decrease in ocean salinity  !     > 0 for decrease in ocean salinity
217  !     Nx * Ny Real*8 array  !     Nx * Ny Real*8 array
218    
219  !     SaltFluxTag  !     SaltFluxTag
220  !     salt flux at tracer point (g/m^2/s)  !     salt flux at tracer point (g/m^2/s)
221    !     SaltFlux is computed for ice-covered area only
222  !     > 0 for increase in ocean salinity  !     > 0 for increase in ocean salinity
223  !     Nx * Ny Real*8 array  !     Nx * Ny Real*8 array
224    
# Line 168  Line 226 
226        INTEGER     OceanTimeTag        INTEGER     OceanTimeTag
227        INTEGER     IceTimeTag        INTEGER     IceTimeTag
228        INTEGER     OceanGridsizeTag        INTEGER     OceanGridsizeTag
229          INTEGER     xCtag , yCtag
230          INTEGER     xGtag , yGtag
231          INTEGER     aCStag, aSNtag
232          INTEGER     dxGtag, dyGtag
233          INTEGER     hFacCtag
234        INTEGER     AreaBcTag        INTEGER     AreaBcTag
235        INTEGER     HeffBcTag        INTEGER     HeffBcTag
236        INTEGER     HsnowBcTag        INTEGER     HsnowBcTag
# Line 178  Line 241 
241        INTEGER     HeffTag        INTEGER     HeffTag
242        INTEGER     HsnowTag        INTEGER     HsnowTag
243        INTEGER     HsaltTag        INTEGER     HsaltTag
244          INTEGER     UiceTag
245          INTEGER     ViceTag
246        INTEGER     UwindTag        INTEGER     UwindTag
247        INTEGER     VwindTag        INTEGER     VwindTag
248        INTEGER     LwDownTag        INTEGER     LwDownTag
# Line 186  Line 251 
251        INTEGER     AqhTag        INTEGER     AqhTag
252        INTEGER     PrecipTag        INTEGER     PrecipTag
253        INTEGER     SstTag        INTEGER     SstTag
254          INTEGER     SssTag
255        INTEGER     UvelTag        INTEGER     UvelTag
256        INTEGER     VvelTag        INTEGER     VvelTag
257        INTEGER     UstressTag        INTEGER     UstressTag
# Line 199  Line 265 
265        PARAMETER ( OceanTimeTag     = 10001001 )        PARAMETER ( OceanTimeTag     = 10001001 )
266        PARAMETER ( IceTimeTag       = 10001002 )        PARAMETER ( IceTimeTag       = 10001002 )
267        PARAMETER ( OceanGridsizeTag = 10002001 )        PARAMETER ( OceanGridsizeTag = 10002001 )
268          PARAMETER ( xCtag            = 10002002 )
269          PARAMETER ( yCtag            = 10002003 )
270          PARAMETER ( xGtag            = 10002004 )
271          PARAMETER ( yGtag            = 10002005 )
272          PARAMETER ( dxGtag           = 10002006 )
273          PARAMETER ( dyGtag           = 10002007 )
274          PARAMETER ( aCStag           = 10002008 )
275          PARAMETER ( aSNtag           = 10002009 )
276          PARAMETER ( hFacCtag         = 10002010 )
277        PARAMETER ( AreaBcTag        = 10003001 )        PARAMETER ( AreaBcTag        = 10003001 )
278        PARAMETER ( HeffBcTag        = 10003002 )        PARAMETER ( HeffBcTag        = 10003002 )
279        PARAMETER ( HsnowBcTag       = 10003003 )        PARAMETER ( HsnowBcTag       = 10003003 )
# Line 209  Line 284 
284        PARAMETER ( HeffTag          = 10004002 )        PARAMETER ( HeffTag          = 10004002 )
285        PARAMETER ( HsnowTag         = 10004003 )        PARAMETER ( HsnowTag         = 10004003 )
286        PARAMETER ( HsaltTag         = 10004004 )        PARAMETER ( HsaltTag         = 10004004 )
287          PARAMETER ( UiceTag          = 10004005 )
288          PARAMETER ( ViceTag          = 10004006 )
289        PARAMETER ( UwindTag         = 10005001 )        PARAMETER ( UwindTag         = 10005001 )
290        PARAMETER ( VwindTag         = 10005002 )        PARAMETER ( VwindTag         = 10005002 )
291        PARAMETER ( LwDownTag        = 10005101 )        PARAMETER ( LwDownTag        = 10005101 )
# Line 217  Line 294 
294        PARAMETER ( AqhTag           = 10005104 )        PARAMETER ( AqhTag           = 10005104 )
295        PARAMETER ( PrecipTag        = 10005105 )        PARAMETER ( PrecipTag        = 10005105 )
296        PARAMETER ( SstTag           = 10005201 )        PARAMETER ( SstTag           = 10005201 )
297        PARAMETER ( UvelTag          = 10005202 )        PARAMETER ( SssTag           = 10005202 )
298        PARAMETER ( VvelTag          = 10005203 )        PARAMETER ( UvelTag          = 10005203 )
299          PARAMETER ( VvelTag          = 10005204 )
300        PARAMETER ( UstressTag       = 10006001 )        PARAMETER ( UstressTag       = 10006001 )
301        PARAMETER ( VstressTag       = 10006002 )        PARAMETER ( VstressTag       = 10006002 )
302        PARAMETER ( SwResidTag       = 20006101 )        PARAMETER ( SwResidTag       = 20006101 )
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22