Symbol Description Uses
PORT_RAND 10



File Line number Procedure Code
./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 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
./pkg/flt/flt_runga2.F 61 FLT_RUNGA2
      Real*8 PORT_RAND
./verification/hs94.1x64x5/code_ad/ini_theta.F 44 INI_THETA
      real*8  PORT_RAND
./verification/hs94.1x64x5/code/ini_theta.F 44 INI_THETA
      real*8  PORT_RAND
./verification/hs94.cs-32x32x5/code/ini_theta.F 44 INI_THETA
      real*8  PORT_RAND