314 |
C Rcolumn -Total thickness (in r_unit) of the fluid column |
C Rcolumn -Total thickness (in r_unit) of the fluid column |
315 |
C R_low - base of fluid in r_unit (Depth(m) / Pressure(Pa) at top Atmos.) |
C R_low - base of fluid in r_unit (Depth(m) / Pressure(Pa) at top Atmos.) |
316 |
C Ro_surf- surface reference (at rest) position, r_unit. |
C Ro_surf- surface reference (at rest) position, r_unit. |
317 |
|
C klowC - index of the lowest ``wet cell'' (2D) |
318 |
C hFac - Fraction of cell in vertical which is open i.e how |
C hFac - Fraction of cell in vertical which is open i.e how |
319 |
C "lopped" a cell is (dimensionless scale factor). |
C "lopped" a cell is (dimensionless scale factor). |
320 |
C Note: The code needs terms like MIN(hFac,hFac(I+1)) |
C Note: The code needs terms like MIN(hFac,hFac(I+1)) |
367 |
C metric term in U equation. |
C metric term in U equation. |
368 |
C tanPhiAtV - tan of the latitude at V point. Used for spherical polar |
C tanPhiAtV - tan of the latitude at V point. Used for spherical polar |
369 |
C metric term in V equation. |
C metric term in V equation. |
370 |
|
COMMON /GRID_I/ klowC |
371 |
|
INTEGER klowC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
372 |
|
|
373 |
COMMON /GRID_R/ |
COMMON /GRID_R/ |
374 |
& dxC,dxF,dxG,dxV,dyC,dyF,dyG,dyU, |
& dxC,dxF,dxG,dxV,dyC,dyF,dyG,dyU, |
375 |
& R_low,Ro_surf,HFacC,HFacW,HFacS, |
& R_low,Ro_surf,HFacC,HFacW,HFacS, |