DEFINITION MODULE UNIFNR;
FROM UNIFORM IMPORT Gener01, Gen, WrGen;

PROCEDURE Setran0 (s : LONGINT);

PROCEDURE Setran1 (s : LONGINT);

PROCEDURE Setran2 (s : LONGINT);

END UNIFNR.
