Symbol Description Uses
hFacUpper 12



File Line number Procedure Code
./verification/global_ocean.cs32x15/code_alt/code.176t_8x4/ini_masks_etc.F 354 INI_MASKS_ETC
         hFacUpper=drF(Km1)/(drF(Km1)+drF(K))
./verification/global_ocean.cs32x15/code_alt/code.176t_8x4/ini_masks_etc.F 355 INI_MASKS_ETC
         IF (Km1.EQ.K) hFacUpper=0.
./verification/global_ocean.cs32x15/code_alt/code.176t_8x4/ini_masks_etc.F 362 INI_MASKS_ETC
     &         hFacUpper+hFacLower*hFacC(I,J,K,bi,bj)
./verification/global_ocean.cs32x15/code_alt/code.176t_8x4/ini_masks_etc.F 51 INI_MASKS_ETC
      _RL hFacUpper,hFacLower
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/ini_masks_etc.F 363 INI_MASKS_ETC
         hFacUpper=drF(Km1)/(drF(Km1)+drF(K))
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/ini_masks_etc.F 364 INI_MASKS_ETC
         IF (Km1.EQ.K) hFacUpper=0.
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/ini_masks_etc.F 371 INI_MASKS_ETC
     &         hFacUpper+hFacLower*hFacC(I,J,K,bi,bj)
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/ini_masks_etc.F 55 INI_MASKS_ETC
      _RL hFacUpper,hFacLower
./model/src/ini_masks_etc.F 335 INI_MASKS_ETC
         hFacUpper=drF(Km1)/(drF(Km1)+drF(K))
./model/src/ini_masks_etc.F 336 INI_MASKS_ETC
         IF (Km1.EQ.K) hFacUpper=0.
./model/src/ini_masks_etc.F 343 INI_MASKS_ETC
     &         hFacUpper+hFacLower*hFacC(I,J,K,bi,bj)
./model/src/ini_masks_etc.F 51 INI_MASKS_ETC
      _RL hFacUpper,hFacLower