Symbol Description Uses
OBNhFac0 3



File Line number Procedure Code
./pkg/obcs/obcs_apply_surf_dr.F 46 OBCS_APPLY_SURF_DR
         hFactmp = OBNhFac0(i,bi,bj) + OBNeta(i,bi,bj)*recip_drF(ks)
./pkg/obcs/obcs_init_fixed.F 102 OBCS_INIT_FIXED
            IF (k.LE.Nr) OBNhFac0(i,bi,bj)=hFacS(i,j,k,bi,bj)
./pkg/obcs/obcs_init_fixed.F 96 OBCS_INIT_FIXED
          OBNhFac0(i,bi,bj)=0.