Symbol Description Uses
mk 9



File Line number Procedure Code
./model/src/port_rand.F 43 NO PROCEDURE
      INTEGER mj,mk,ma(nff)
./model/src/port_rand.F 48 NO PROCEDURE
      real*8 mj,mk,ma(nff)
./model/src/port_rand.F 63 NO PROCEDURE
        mk=1
./model/src/port_rand.F 66 NO PROCEDURE
          ma(ii)=mk
./model/src/port_rand.F 67 NO PROCEDURE
          mk=mj-mk
./model/src/port_rand.F 68 NO PROCEDURE
          IF (mk.LT.mz) mk=mk+mbig