Symbol Description Uses
hfacS 4



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