Symbol Description Uses
zhi 6



File Line number Procedure Code
./pkg/flt/flt_functions.F 158 NO PROCEDURE
      _RL rG, fp, fm, dist, zlo, zhi
./pkg/flt/flt_functions.F 169 NO PROCEDURE
         zhi = rC(k+1)
./pkg/flt/flt_functions.F 170 NO PROCEDURE
         if (k.eq.Nr) zhi = rC(k)+drF(Nr)*0.5
./pkg/flt/flt_functions.F 172 NO PROCEDURE
         if (zlo .le. rG .and. zhi .gt. rG) then
./pkg/flt/flt_functions.F 173 NO PROCEDURE
            dist = zhi - zlo
./pkg/flt/flt_functions.F 174 NO PROCEDURE
            fp = (zhi - rG) / dist