| 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) |