Symbol Description Uses
OBWeta 8



File Line number Procedure Code
./pkg/obcs/obcs_apply_surf_dr.F 80 OBCS_APPLY_SURF_DR
         hFactmp = OBWhFac0(j,bi,bj) + OBWeta(j,bi,bj)*recip_drF(ks)
./pkg/obcs/obcs_calc.F 106 OBCS_CALC
              OBWeta(J,bi,bj)=0.
./pkg/obcs/OBCS.h 186 NO PROCEDURE
     &  OBNeta,  OBSeta,  OBEeta,  OBWeta
./pkg/obcs/OBCS.h 194 NO PROCEDURE
      _RS OBWeta (1-Oly:sNy+Oly,nSx,nSy)
./pkg/obcs/obcs_apply_r_star.F 82 OBCS_APPLY_R_STAR
     &      + OBWeta(i,bi,bj)
./pkg/obcs/obcs_apply_eta.F 63 OBCS_APPLY_ETA
        etaFld(I_obc,J,bi,bj)=OBWeta(J,bi,bj)*obc_mask
./pkg/obcs/obcs_init_variables.F 134 OBCS_INIT_VARIABLES
          OBWeta(J,bi,bj)=0.
./verification/exp4/code/obcs_calc.F 94 OBCS_CALC
            OBWeta(J,bi,bj)=EtaBC