File |
Line number |
Procedure |
Code |
./pkg/flt/flt_runga4.F |
254 |
FLT_RUNGA4 |
CALL FLT_TRILINEAR(itx3,jty3,ktz3,v4,vVel, |
./pkg/flt/flt_runga4.F |
264 |
FLT_RUNGA4 |
CALL FLT_BILINEAR(itx3,jty3,v4,vVel, |
./pkg/flt/flt_runga4.F |
271 |
FLT_RUNGA4 |
v4 = v4 + PORT_RAND_NORM()*flt_noise |
./pkg/flt/flt_runga4.F |
282 |
FLT_RUNGA4 |
v4 = v4 + v4*(PORT_RAND(seed)-0.5)*flt_noise |
./pkg/flt/flt_runga4.F |
300 |
FLT_RUNGA4 |
& * (v1 + 2*v2 + 2*v3 + v4) * scaley |
./pkg/flt/flt_runga4.F |
55 |
FLT_RUNGA4 |
_RL u1, v1, u2, v2, u3, v3, u4, v4 |
./pkg/openad/ad_s_different_multiple.F |
40 |
OAD_S_DIFFERENT_MULTIPLE |
_RL v1, v2, v3, v4, d1, d2, d3 |
./pkg/openad/ad_s_different_multiple.F |
57 |
OAD_S_DIFFERENT_MULTIPLE |
v4 = NINT(v1/freq)*freq |
./pkg/openad/ad_s_different_multiple.F |
58 |
OAD_S_DIFFERENT_MULTIPLE |
d1 = v1-v4 |
./pkg/openad/ad_s_different_multiple.F |
59 |
OAD_S_DIFFERENT_MULTIPLE |
d2 = v2-v4 |
./pkg/openad/ad_s_different_multiple.F |
60 |
OAD_S_DIFFERENT_MULTIPLE |
d3 = v3-v4 |
./eesupp/src/diff_phase_multiple.F |
41 |
NO PROCEDURE |
_RL v1, v2, v3, v4, d1, d2, d3 |
./eesupp/src/diff_phase_multiple.F |
61 |
NO PROCEDURE |
v4 = phase + NINT((v1-phase)/freq)*freq |
./eesupp/src/diff_phase_multiple.F |
62 |
NO PROCEDURE |
d1 = v1-v4 |
./eesupp/src/diff_phase_multiple.F |
63 |
NO PROCEDURE |
d2 = v2-v4 |
./eesupp/src/diff_phase_multiple.F |
64 |
NO PROCEDURE |
d3 = v3-v4 |
./eesupp/src/different_multiple.F |
40 |
NO PROCEDURE |
_RL v1, v2, v3, v4, d1, d2, d3 |
./eesupp/src/different_multiple.F |
57 |
NO PROCEDURE |
v4 = NINT(v1/freq)*freq |
./eesupp/src/different_multiple.F |
58 |
NO PROCEDURE |
d1 = v1-v4 |
./eesupp/src/different_multiple.F |
59 |
NO PROCEDURE |
d2 = v2-v4 |
./eesupp/src/different_multiple.F |
60 |
NO PROCEDURE |
d3 = v3-v4 |