Symbol Description Uses
w4 8


File Line number Procedure Code
./pkg/flt/flt_runga4.F 251 FLT_RUNGA4 
                CALL FLT_TRILINEAR(itx3,jty3,ktz3,w4,wVel,
./pkg/flt/flt_runga4.F 270 FLT_RUNGA4 
                  w4 = w4 + port_rand_norm()*flt_noise
./pkg/flt/flt_runga4.F 281 FLT_RUNGA4 
                  w4 = w4 + w4*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga4.F 299 FLT_RUNGA4 
     &                          * (w1 + 2*w2 + 2*w3 + w4) * scalez
./pkg/flt/flt_runga4.F 47 FLT_RUNGA4 
      _RL w1, w2, w3, w4, ktz1, ktz2, ktz3, kz, scalez