C $Header: /u/gcmpack/MITgcm/pkg/ctrl/ctrl_weights.h,v 1.11 2014/10/09 00:49:27 gforget Exp $ C $Name: $ c Define dummy weights as a placeholder common /ctrl_weights_dummy_r/ & wtheta, wsalt, & wuvvel, wetan, wuvel, wvvel, & wdiffkr, wkapgm, wkapredi, & wedtaux, wedtauy _RL wtheta ( nr,nsx,nsy ) _RL wsalt ( nr,nsx,nsy ) _RL wuvvel ( nr,nsx,nsy ) _RL wuvel ( nr,nsx,nsy ) _RL wvvel ( nr,nsx,nsy ) _RL wetan ( snx,sny,nsx,nsy ) _RL wdiffkr ( nr,nsx,nsy ) _RL wkapgm ( nr,nsx,nsy ) _RL wkapredi ( nr,nsx,nsy ) _RL wedtaux ( nr,nsx,nsy ) _RL wedtauy ( nr,nsx,nsy ) #if (defined (ALLOW_COST_HFLUXM) defined (ALLOW_HFLUXM_CONTROL)) c whfluxm - weight for heat flux. common /cost_weights_r/ whfluxm _RL whfluxm (1-olx:snx+olx,1-oly:sny+oly, nsx,nsy) #endif