Symbol Description Uses
OBWeta 10



File Line number Procedure Code
./pkg/obcs/OBCS.h 342 NO PROCEDURE
     &  OBNeta,  OBSeta,  OBEeta,  OBWeta
./pkg/obcs/OBCS.h 346 NO PROCEDURE
      _RL OBWeta (1-Oly:sNy+Oly,nSx,nSy)
./pkg/obcs/obcs_apply_eta.F 79 OBCS_APPLY_ETA
     &        etaFld(i_obc,j,bi,bj) = OBWeta(j,bi,bj)
./pkg/obcs/obcs_apply_r_star.F 80 OBCS_APPLY_R_STAR
     &      + OBWeta(i,bi,bj)
./pkg/obcs/obcs_apply_surf_dr.F 77 OBCS_APPLY_SURF_DR
         hFactmp = OBWhFac0(j,bi,bj) + OBWeta(j,bi,bj)*recip_drF(ks)
./pkg/obcs/obcs_calc.F 155 OBCS_CALC
              OBWeta(j,bi,bj)= ETA_F1(j,1,1)
./pkg/obcs/obcs_calc.F 174 OBCS_CALC
              OBWeta(J,bi,bj)=0.
./pkg/obcs/obcs_external_fields_load.F 529 OBCS_EXTERNAL_FIELDS_LOAD
           OBWeta(j,bi,bj) = bWght*OBWeta0(j,bi,bj)
./pkg/obcs/obcs_init_variables.F 168 OBCS_INIT_VARIABLES
          OBWeta (J,bi,bj) = 0. _d 0
./pkg/obcs/obcs_prescribe_read.F 139 OBCS_PRESCRIBE_READ
     U     OBWeta, OBWeta0, OBWeta1, OBWetafile,