Symbol Description Uses
DBLE 14



File Line number Procedure Code
./pkg/flt/flt_init_varia.F 265 FLT_INIT_VARIA
         npart_dist = npart_dist + DBLE(npart_tile(bi,bj))
./pkg/flt/flt_traj.F 210 FLT_TRAJ
         tmp(1) = DBLE(npart_tile(bi,bj))+npart_read
./pkg/flt/flt_up.F 208 FLT_UP
         tmp(1) = DBLE(npart_tile(bi,bj))+npart_read
./pkg/flt/flt_write_pickup.F 101 FLT_WRITE_PICKUP
          npart_dist = npart_dist + DBLE(npart_tile(bi,bj))
./pkg/gmredi/gmredi_readparms.F 214 GMREDI_READPARMS
        GM_BVP_rModeNumber = 1. _d 0/DBLE(GM_BVP_ModeNumber)
./pkg/sphere/sphere.F 562 HELMHOLTZ
            X(L) = SNGL(1.0D0/DSQRT(DBLE(FLOAT(4*L*L-1))))
./pkg/sphere/sphere.F 563 HELMHOLTZ
            Y(L) = SNGL(DSQRT(DBLE(FLOAT(L))))
./pkg/sphere/sphere.F 564 HELMHOLTZ
            Y(L+LMAX) = SNGL(DSQRT(DBLE(FLOAT(L+LMAX))))
./pkg/sphere/sphere.F 571 HELMHOLTZ
      C  = SNGL(DSQRT(1.0D0-DBLE(S)*DBLE(S)))
./pkg/sphere/sphere.F 615 RECUR_Z
         ZZ   = ZZ * DBLE(FLOAT(L+L+1))/DBLE(FLOAT(L+L))
./verification/flt_example/extra/write_float.F 205 NO PROCEDURE
                   npart  = DBLE(ip)
./verification/flt_example/extra/write_float.F 210 NO PROCEDURE
                   kfloat = DBLE(ip)