Symbol Description Uses
DBLE 13



File Line number Procedure Code
./pkg/flt/flt_init_varia.F 217 FLT_INIT_VARIA
         npart_dist = npart_dist + DBLE(npart_tile(bi,bj))
./pkg/flt/flt_traj.F 85 FLT_TRAJ
         tmp(1) = DBLE(npart_tile(bi,bj))+npart_read
./pkg/flt/flt_up.F 78 FLT_UP
         tmp(1) = DBLE(npart_tile(bi,bj))+npart_read
./pkg/flt/flt_write_pickup.F 100 FLT_WRITE_PICKUP
          npart_dist = npart_dist + DBLE(npart_tile(bi,bj))
./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)