284 |
C | "WB" | |
C | "WB" | |
285 |
C | | |
C | | |
286 |
C \==========================================================/ |
C \==========================================================/ |
287 |
|
|
288 |
|
C Macros that override/modify standard definitions |
289 |
|
#include "GRID_MACROS.h" |
290 |
|
|
291 |
C |
C |
292 |
C-- COMMON /GRID_R/ REAL valued grid defining variables. |
C-- COMMON /GRID_R/ REAL valued grid defining variables. |
293 |
C dxC - Cell center separation in X across western cell wall (m) |
C dxC - Cell center separation in X across western cell wall (m) |
343 |
& rH, rhFacC,rhFacW,rhFacS, |
& rH, rhFacC,rhFacW,rhFacS, |
344 |
& saFac,xC,yC,zA,zC,zFace, |
& saFac,xC,yC,zA,zC,zFace, |
345 |
& maskW,maskS |
& maskW,maskS |
346 |
real dxC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS dxC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
347 |
real dxF (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS dxF (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
348 |
real dxG (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS dxG (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
349 |
real dxV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS dxV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
350 |
real dyC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS dyC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
351 |
real dyF (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS dyF (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
352 |
real dyG (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS dyG (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
353 |
real dyU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS dyU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
354 |
real dzC (1:Nz) |
_RS dzC (1:Nz) |
355 |
real dzF (1:Nz) |
_RS dzF (1:Nz) |
356 |
real H (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS H (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
357 |
real HFacC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
_RS HFacC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
358 |
real HFacW (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
_RS HFacW (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
359 |
real HFacS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
_RS HFacS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
360 |
real rdxC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS rdxC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
361 |
real rdxF (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS rdxF (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
362 |
real rdxG (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS rdxG (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
363 |
real rdxV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS rdxV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
364 |
real rdyC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS rdyC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
365 |
real rdyF (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS rdyF (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
366 |
real rdyG (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS rdyG (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
367 |
real rdyU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS rdyU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
368 |
real rdzC (1:Nz) |
_RS rdzC (1:Nz) |
369 |
real rdzF (1:Nz) |
_RS rdzF (1:Nz) |
370 |
real rh (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS rh (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
371 |
real rhFacC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
_RS rhFacC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
372 |
real rhFacW (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
_RS rhFacW (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
373 |
real rhFacS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
_RS rhFacS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
374 |
real saFac (1:Nz) |
_RS saFac (1:Nz) |
375 |
real xC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS xC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
376 |
real yC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS yC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
377 |
real zA (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS zA (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
378 |
real zC (1:Nz) |
_RS zC (1:Nz) |
379 |
real zFace (1:Nz+1) |
_RS zFace (1:Nz+1) |
380 |
real maskW (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
_RS maskW (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
381 |
real maskS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
_RS maskS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:Nz,nSx,nSy) |
382 |
|
|
383 |
|
|
384 |
C-- COMMON /GRID_I/ Integer valued grid defining variables |
C-- COMMON /GRID_I/ Integer valued grid defining variables |