| File |
Line number |
Procedure |
Code |
|
./pkg/flt/FLT.h |
111 |
NO PROCEDURE |
_RL tstart(max_npart_tile,nSx,nSy) |
|
./pkg/flt/FLT.h |
121 |
NO PROCEDURE |
& npart, tstart, tend, |
|
./pkg/flt/flt_down.F |
41 |
FLT_DOWN |
& ( myTime.GE.tstart(ip,bi,bj)) |
|
./pkg/flt/flt_exch2.F |
114 |
FLT_EXCH2 |
fltbuf_send(ic+2,bi,bj,W2_EAST) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exch2.F |
147 |
FLT_EXCH2 |
fltbuf_send(ic+2,bi,bj,W2_WEST) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exch2.F |
197 |
FLT_EXCH2 |
tstart(ip,bi,bj) = tstart(jp,bi,bj) |
|
./pkg/flt/flt_exch2.F |
239 |
FLT_EXCH2 |
fltbuf_send(ic+2,bi,bj,W2_NORTH) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exch2.F |
277 |
FLT_EXCH2 |
fltbuf_send(ic+2,bi,bj,W2_SOUTH) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exch2.F |
334 |
FLT_EXCH2 |
tstart(ip,bi,bj) = tstart(jp,bi,bj) |
|
./pkg/flt/flt_exch2.F |
397 |
FLT_EXCH2 |
tstart(jp,bi,bj) = fltbuf_recv(ic+2,bi,bj,W2_EAST) |
|
./pkg/flt/flt_exch2.F |
426 |
FLT_EXCH2 |
tstart(jp,bi,bj) = fltbuf_recv(ic+2,bi,bj,W2_WEST) |
|
./pkg/flt/flt_exch2.F |
455 |
FLT_EXCH2 |
tstart(jp,bi,bj) = fltbuf_recv(ic+2,bi,bj,W2_NORTH) |
|
./pkg/flt/flt_exch2.F |
484 |
FLT_EXCH2 |
tstart(jp,bi,bj) = fltbuf_recv(ic+2,bi,bj,W2_SOUTH) |
|
./pkg/flt/flt_exchg.F |
114 |
FLT_EXCHG |
fltbuf_sendE(ic+2,bi,bj) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exchg.F |
147 |
FLT_EXCHG |
fltbuf_sendW(ic+2,bi,bj) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exchg.F |
193 |
FLT_EXCHG |
tstart(ip,bi,bj) = tstart(jp,bi,bj) |
|
./pkg/flt/flt_exchg.F |
242 |
FLT_EXCHG |
tstart(jp,bi,bj) = fltbuf_recvE(ic+2,bi,bj) |
|
./pkg/flt/flt_exchg.F |
271 |
FLT_EXCHG |
tstart(jp,bi,bj) = fltbuf_recvW(ic+2,bi,bj) |
|
./pkg/flt/flt_exchg.F |
347 |
FLT_EXCHG |
fltbuf_sendE(ic+2,bi,bj) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exchg.F |
385 |
FLT_EXCHG |
fltbuf_sendW(ic+2,bi,bj) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exchg.F |
436 |
FLT_EXCHG |
tstart(ip,bi,bj) = tstart(jp,bi,bj) |
|
./pkg/flt/flt_exchg.F |
485 |
FLT_EXCHG |
tstart(jp,bi,bj) = fltbuf_recvE(ic+2,bi,bj) |
|
./pkg/flt/flt_exchg.F |
514 |
FLT_EXCHG |
tstart(jp,bi,bj) = fltbuf_recvW(ic+2,bi,bj) |
|
./pkg/flt/flt_init_varia.F |
159 |
FLT_INIT_VARIA |
tstart(npart_tile(bi,bj),bi,bj) = tmp(2) |
|
./pkg/flt/flt_init_varia.F |
203 |
FLT_INIT_VARIA |
tstart(ip,bi,bj) = -1. _d 0 |
|
./pkg/flt/flt_init_varia.F |
245 |
FLT_INIT_VARIA |
tstart(ip,bi,bj) = tmp(2) |
|
./pkg/flt/flt_runga2.F |
88 |
FLT_RUNGA2 |
IF ( (tstart(ip,bi,bj).EQ.-1..OR.myTime.GE.tstart(ip,bi,bj)) |
|
./pkg/flt/flt_runga4.F |
88 |
FLT_RUNGA4 |
IF ( (tstart(ip,bi,bj).EQ.-1..OR.myTime.GE.tstart(ip,bi,bj)) |
|
./pkg/flt/flt_traj.F |
120 |
FLT_TRAJ |
& ( myTime.GE.tstart(ip,bi,bj)) .AND. |
|
./pkg/flt/flt_up.F |
130 |
FLT_UP |
& ( myTime.GE.tstart(ip,bi,bj) ) .AND. |
|
./pkg/flt/flt_up.F |
93 |
FLT_UP |
IF ( myTime.GE.tstart(ip,bi,bj) .AND. |
|
./pkg/flt/flt_write_pickup.F |
82 |
FLT_WRITE_PICKUP |
tmp(2) = tstart(ip,bi,bj) |
|
./verification/flt_example/extra/write_float.F |
101 |
NO PROCEDURE |
& kpart,kfloat,iup,itop,tstart,tend |
|
./verification/flt_example/extra/write_float.F |
109 |
NO PROCEDURE |
tstart = -1. |
|
./verification/flt_example/extra/write_float.F |
117 |
NO PROCEDURE |
if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart, |
|
./verification/flt_example/extra/write_float.F |
123 |
NO PROCEDURE |
& kpart,kfloat,iup,itop,tstart,tend |
|
./verification/flt_example/extra/write_float.F |
136 |
NO PROCEDURE |
tstart = 172800. |
|
./verification/flt_example/extra/write_float.F |
144 |
NO PROCEDURE |
if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart, |
|
./verification/flt_example/extra/write_float.F |
150 |
NO PROCEDURE |
& kpart,kfloat,iup,itop,tstart,tend |
|
./verification/flt_example/extra/write_float.F |
162 |
NO PROCEDURE |
tstart = 432000. |
|
./verification/flt_example/extra/write_float.F |
170 |
NO PROCEDURE |
if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart, |
|
./verification/flt_example/extra/write_float.F |
176 |
NO PROCEDURE |
& kpart,kfloat,iup,itop,tstart,tend |
|
./verification/flt_example/extra/write_float.F |
184 |
NO PROCEDURE |
tstart = -1. |
|
./verification/flt_example/extra/write_float.F |
192 |
NO PROCEDURE |
if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart, |
|
./verification/flt_example/extra/write_float.F |
196 |
NO PROCEDURE |
& kpart,kfloat,iup,itop,tstart,tend |
|
./verification/flt_example/extra/write_float.F |
206 |
NO PROCEDURE |
tstart = -1. |
|
./verification/flt_example/extra/write_float.F |
215 |
NO PROCEDURE |
& write(1,rec=1) npart,tstart,xpart,ypart,kpart,kfloat,iup,itop,tend |
|
./verification/flt_example/extra/write_float.F |
4 |
NO PROCEDURE |
& ,tstart,tend |
|
./verification/flt_example/extra/write_float.F |
58 |
NO PROCEDURE |
tstart = -1. |
|
./verification/flt_example/extra/write_float.F |
66 |
NO PROCEDURE |
if (flag) write(1,rec=1) npart,tstart,xpart,ypart, |
|
./verification/flt_example/extra/write_float.F |
87 |
NO PROCEDURE |
tstart = -1. |
|
./verification/flt_example/extra/write_float.F |
95 |
NO PROCEDURE |
if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart, |