Symbol | Description | Uses |
ma | 15 |
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 | 54 | NO PROCEDURE |
SAVE firstCall,inext,inextp,ma |
./model/src/port_rand.F | 62 | NO PROCEDURE |
ma(nff)=mj |
./model/src/port_rand.F | 66 | NO PROCEDURE |
ma(ii)=mk |
./model/src/port_rand.F | 69 | NO PROCEDURE |
mj=ma(ii) |
./model/src/port_rand.F | 73 | NO PROCEDURE |
ma(i)=ma(i)-ma(1+mod(i+30,nff)) |
./model/src/port_rand.F | 74 | NO PROCEDURE |
IF (ma(i).LT.mz) ma(i)=ma(i)+mbig |
./model/src/port_rand.F | 87 | NO PROCEDURE |
mj=ma(inext)-ma(inextp) |
./model/src/port_rand.F | 89 | NO PROCEDURE |
ma(inext)=mj |