

DEFINITION MODULE SUPRAND;

FROM SUPINT IMPORT SuperInteger;

PROCEDURE SupRandom
   ( A, B, C : SuperInteger
   );


PROCEDURE SetSeed
   ( S1, S2 : LONGINT
   );


PROCEDURE GetState
   ( VAR S1, S2 : LONGINT
   );


END SUPRAND.
