Symbol Description Uses
OBWhFac0 3


File Line number Procedure Code
./pkg/obcs/obcs_init_fixed.F 100 OBCS_INIT_FIXED 
          OBWhFac0(j,bi,bj)=0.
./pkg/obcs/obcs_init_fixed.F 111 OBCS_INIT_FIXED 
            IF (k.LE.Nr) OBWhFac0(j,bi,bj)=hFacW(i,j,k,bi,bj)