| File |
Line number |
Procedure |
Code |
|
./pkg/flt/FLT.h |
100 |
NO PROCEDURE |
_RL flt_noise |
|
./pkg/flt/FLT.h |
101 |
NO PROCEDURE |
common /flt_param_n/ flt_noise |
|
./pkg/flt/flt_init.F |
66 |
FLT_INIT |
namelist //flt_nml flt_int_traj, flt_int_prof, flt_noise |
|
./pkg/flt/flt_init.F |
76 |
FLT_INIT |
flt_noise = 0.0 |
|
./pkg/flt/flt_runga2.F |
136 |
FLT_RUNGA2 |
uu = uu + uu*(PORT_RAND(seed)-0.5)*flt_noise |
|
./pkg/flt/flt_runga2.F |
137 |
FLT_RUNGA2 |
vv = vv + vv*(PORT_RAND(seed)-0.5)*flt_noise |
|
./pkg/flt/flt_runga2.F |
141 |
FLT_RUNGA2 |
ww = ww + ww*(PORT_RAND(seed)-0.5)*flt_noise |
|
./pkg/flt/flt_runga2.F |
172 |
FLT_RUNGA2 |
u1 = u1 + port_rand_norm()*flt_noise |
|
./pkg/flt/flt_runga2.F |
173 |
FLT_RUNGA2 |
v1 = v1 + port_rand_norm()*flt_noise |
|
./pkg/flt/flt_runga2.F |
177 |
FLT_RUNGA2 |
w1 = w1 + port_rand_norm()*flt_noise |
|
./pkg/flt/flt_runga2.F |
183 |
FLT_RUNGA2 |
u1 = u1 + u1*(PORT_RAND(seed)-0.5)*flt_noise |
|
./pkg/flt/flt_runga2.F |
184 |
FLT_RUNGA2 |
v1 = v1 + v1*(PORT_RAND(seed)-0.5)*flt_noise |
|
./pkg/flt/flt_runga2.F |
188 |
FLT_RUNGA2 |
w1 = w1 + w1*(PORT_RAND(seed)-0.5)*flt_noise |