PDP-10 Archive: decus/20-0026/randu.ssp from decuslib20-02

Trailing-Edge - PDP-10 Archives - decuslib20-02 - decus/20-0026/randu.ssp

There are 2 other files named randu.ssp in the archive. Click here to see a list.

	SUBROUTINE RANDU(IX,IY,YFL)
	CALL SETRAN(IX)
	YFL=RAN(0)
	CALL SAVRAN(IY)
	RETURN
	END