C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/PRM/multi_comp_setup/cg/code/Attic/PARENT_OVERRIDE.h,v 1.3 2008/02/05 00:34:13 jmc dead $ C $Name: $ CBOP C !ROUTINE: PARENT_OVERRIDE C !INTERFACE: C include "PARENT_OVERRIDE.h" C !DESCRIPTION: C \bv C *==========================================================* C | PARENT_OVERRIDE.h C | o Extra forcing fields C *==========================================================* C \ev CEOP C COMMON /PO_FIELDS_R/ & po_gu, & po_gv, & po_gtheta _RS po_gu (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy) _RS po_gv (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy) _RS po_gtheta(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy) COMMON /PO_FIELDS_L/ & usePO_Tendency_Apply_U, & usePO_Tendency_Apply_V, & usePO_Tendency_Apply_Theta LOGICAL usePO_Tendency_Apply_U LOGICAL usePO_Tendency_Apply_V LOGICAL usePO_Tendency_Apply_Theta