Symbol Description Uses
surf_Fe 4



File Line number Procedure Code
./pkg/bling/bling_main.F 102 BLING_MAIN
      _RL  surf_Fe(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/bling/bling_main.F 137 BLING_MAIN
        surf_Fe(i,j)         = 0. _d 0
./pkg/bling/bling_main.F 235 BLING_MAIN
               surf_Fe(i,j) = alpfe*InputFe(i,j,bi,bj)*recip_drF(1)
./pkg/bling/bling_main.F 272 BLING_MAIN
        CALL DIAGNOSTICS_FILL(surf_Fe ,'BLGSURFE',0,1,2,bi,bj,myThid)