Source position: uranmult.pas line 22
procedure RanMultIndep(
M: TVector;
S: TVector;
Lb: Integer;
Ub: Integer;
X: TVector
);