| File |
Line number |
Procedure |
Code |
|
./pkg/flt/FLT.h |
109 |
NO PROCEDURE |
& npart, tstart, tend, |
|
./pkg/flt/FLT.h |
99 |
NO PROCEDURE |
_RL tstart(max_npart_tile,nSx,nSy) |
|
./pkg/flt/flt_down.F |
41 |
FLT_DOWN |
& ( myTime.GE.tstart(ip,bi,bj)) |
|
./pkg/flt/flt_exch2.F |
120 |
FLT_EXCH2 |
fltbuf_send(ic+2,bi,bj,W2_EAST) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exch2.F |
149 |
FLT_EXCH2 |
fltbuf_send(ic+2,bi,bj,W2_WEST) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exch2.F |
195 |
FLT_EXCH2 |
tstart(ip,bi,bj) = tstart(jp,bi,bj) |
|
./pkg/flt/flt_exch2.F |
235 |
FLT_EXCH2 |
fltbuf_send(ic+2,bi,bj,W2_NORTH) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exch2.F |
269 |
FLT_EXCH2 |
fltbuf_send(ic+2,bi,bj,W2_SOUTH) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exch2.F |
322 |
FLT_EXCH2 |
tstart(ip,bi,bj) = tstart(jp,bi,bj) |
|
./pkg/flt/flt_exch2.F |
396 |
FLT_EXCH2 |
tstart(jp,bi,bj) = fltbuf_recv(ic+2,bi,bj,W2_EAST) |
|
./pkg/flt/flt_exch2.F |
425 |
FLT_EXCH2 |
tstart(jp,bi,bj) = fltbuf_recv(ic+2,bi,bj,W2_WEST) |
|
./pkg/flt/flt_exch2.F |
454 |
FLT_EXCH2 |
tstart(jp,bi,bj) = fltbuf_recv(ic+2,bi,bj,W2_NORTH) |
|
./pkg/flt/flt_exch2.F |
483 |
FLT_EXCH2 |
tstart(jp,bi,bj) = fltbuf_recv(ic+2,bi,bj,W2_SOUTH) |
|
./pkg/flt/flt_exchg.F |
110 |
FLT_EXCHG |
fltbuf_sendW(ic+2,bi,bj) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exchg.F |
156 |
FLT_EXCHG |
tstart(ip,bi,bj) = tstart(jp,bi,bj) |
|
./pkg/flt/flt_exchg.F |
205 |
FLT_EXCHG |
tstart(jp,bi,bj) = fltbuf_recvE(ic+2,bi,bj) |
|
./pkg/flt/flt_exchg.F |
234 |
FLT_EXCHG |
tstart(jp,bi,bj) = fltbuf_recvW(ic+2,bi,bj) |
|
./pkg/flt/flt_exchg.F |
297 |
FLT_EXCHG |
fltbuf_sendE(ic+2,bi,bj) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exchg.F |
326 |
FLT_EXCHG |
fltbuf_sendW(ic+2,bi,bj) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_exchg.F |
377 |
FLT_EXCHG |
tstart(ip,bi,bj) = tstart(jp,bi,bj) |
|
./pkg/flt/flt_exchg.F |
426 |
FLT_EXCHG |
tstart(jp,bi,bj) = fltbuf_recvE(ic+2,bi,bj) |
|
./pkg/flt/flt_exchg.F |
455 |
FLT_EXCHG |
tstart(jp,bi,bj) = fltbuf_recvW(ic+2,bi,bj) |
|
./pkg/flt/flt_exchg.F |
86 |
FLT_EXCHG |
fltbuf_sendE(ic+2,bi,bj) = tstart(ip,bi,bj) |
|
./pkg/flt/flt_init_varia.F |
138 |
FLT_INIT_VARIA |
tstart(npart_tile(bi,bj),bi,bj) = tmp(2) |
|
./pkg/flt/flt_init_varia.F |
198 |
FLT_INIT_VARIA |
tstart(ip,bi,bj) = tmp(2) |
|
./pkg/flt/flt_runga2.F |
83 |
FLT_RUNGA2 |
IF ( (tstart(ip,bi,bj).EQ.-1..OR.myTime.GE.tstart(ip,bi,bj)) |
|
./pkg/flt/flt_runga4.F |
83 |
FLT_RUNGA4 |
IF ( (tstart(ip,bi,bj).EQ.-1..OR.myTime.GE.tstart(ip,bi,bj)) |
|
./pkg/flt/flt_traj.F |
130 |
FLT_TRAJ |
IF ( ( myTime.GE.tstart(ip,bi,bj)) .AND. |
|
./pkg/flt/flt_up.F |
102 |
FLT_UP |
IF ( myTime.GE.tstart(ip,bi,bj) .AND. |
|
./pkg/flt/flt_up.F |
136 |
FLT_UP |
IF ( myTime.GE.tstart(ip,bi,bj) .AND. |
|
./pkg/flt/flt_write_pickup.F |
81 |
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, |