Symbol Description Uses
hfacS 4



File Line number Procedure Code
./pkg/ecco/cost_obcs_ageos.F 230 COST_OBCS_AGEOS
     &       hfacS(i,j+jp1,k,bi,bj)*hfacS(i,j+jp1,k+1,bi,bj)
./pkg/ecco/cost_obcs_ageos.F 289 COST_OBCS_AGEOS
     &       hfacS(i,j+jp1,k,bi,bj)*hfacS(i,j+jp1,k+1,bi,bj)