Symbol Description Uses
PORT_RAND 21


File Line number Procedure Code
./pkg/flt/flt_runga2.F 127 FLT_RUNGA2 
                uu = uu + uu*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga2.F 128 FLT_RUNGA2 
                vv = vv + vv*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga2.F 132 FLT_RUNGA2 
                  ww = ww + ww*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga2.F 174 FLT_RUNGA2 
                u1 = u1 + u1*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga2.F 175 FLT_RUNGA2 
                v1 = v1 + v1*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga2.F 179 FLT_RUNGA2 
                  w1 = w1 + w1*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga2.F 42 FLT_RUNGA2 
      Real*8   PORT_RAND
./pkg/flt/flt_runga4.F 129 FLT_RUNGA4 
                u1 = u1 + u1*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga4.F 130 FLT_RUNGA4 
                v1 = v1 + v1*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga4.F 134 FLT_RUNGA4 
                  w1 = w1 + w1*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga4.F 181 FLT_RUNGA4 
                u2 = u2 + u2*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga4.F 182 FLT_RUNGA4 
                v2 = v2 + v2*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga4.F 186 FLT_RUNGA4 
                  w2 = w2 + w2*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga4.F 231 FLT_RUNGA4 
                u3 = u3 + u3*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga4.F 232 FLT_RUNGA4 
                v3 = v3 + v3*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga4.F 236 FLT_RUNGA4 
                  w3 = w3 + w3*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga4.F 281 FLT_RUNGA4 
                u4 = u4 + u4*(PORT_RAND(seed)-0.5)*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 286 FLT_RUNGA4 
                  w4 = w4 + w4*(PORT_RAND(seed)-0.5)*flt_noise
./pkg/flt/flt_runga4.F 42 FLT_RUNGA4 
      Real*8   PORT_RAND
./model/src/port_rand.F 16 NO PROCEDURE 
      real*8 FUNCTION PORT_RAND(seed)