Symbol Description Uses
E true if N,S,E,W edge of myTile is an Edge of the cube 22



File Line number Procedure Code
./pkg/fizhi/fizhi_lsm.F 464 TILE
      IF(SWET1(ChNo).LT.1.E-10) SWET1(CHNO) = 0.0
./pkg/fizhi/fizhi_lsm.F 465 TILE
      IF(SWET2(ChNo).LT.1.E-10) SWET2(CHNO) = 0.0
./pkg/fizhi/fizhi_lsm.F 466 TILE
      IF(SWET3(ChNo).LT.1.E-10) SWET3(CHNO) = 0.0
./pkg/fizhi/fizhi_lsm.F 467 TILE
      IF(CAPAC(ChNo).LT.1.E-10) CAPAC(CHNO) = 0.0
./pkg/fizhi/fizhi_lsm.F 468 TILE
      IF(SNOW (ChNo).LT.1.E-10) SNOW (CHNO) = 0.0
./pkg/fizhi/fizhi_lsm.F 469 TILE
      IF(RUNOFF(ChNo).LT.1.E-10) RUNOFF(CHNO) = 0.0
./pkg/showflops/showflops_init.F 64 SHOWFLOPS_INIT
     $     /(real_time + 1E-36)
./pkg/showflops/showflops_init.F 70 SHOWFLOPS_INIT
     $     /(real_time + 1E-36)
./pkg/showflops/showflops_inloop.F 81 SHOWFLOPS_INLOOP
     $     mflops, ' ', mflops*proc_time/(real_time + 1E-36),
./pkg/showflops/showflops_inloop.F 87 SHOWFLOPS_INLOOP
     $     ipc, ' ', ipc*proc_time/(real_time + 1E-36),
./pkg/showflops/showflops_insolve.F 79 SHOWFLOPS_INSOLVE
     $     *proc_time/(real_time + 1E-36)
./pkg/showflops/showflops_insolve.F 85 SHOWFLOPS_INSOLVE
     $     /(real_time + 1E-36)
./pkg/sphere/sphere.F 315 SHC2ZONE
      REAL    A, B, E, F, Q, DA, DB, XLAT
./pkg/sphere/sphere.F 333 SHC2ZONE
         E    = 0.0
./pkg/sphere/sphere.F 343 SHC2ZONE
            E    = E+DA
./pkg/sphere/sphere.F 352 SHC2ZONE
            E    = E-DA
./pkg/sphere/sphere.F 363 SHC2ZONE
            E    = E+DA
./pkg/sphere/sphere.F 368 SHC2ZONE
            HN(1) = E
./pkg/sphere/sphere.F 372 SHC2ZONE
            HN(M+M  ) = E