PDP-10 Archive: 43,50145/randu.ssp from decuslib10-02

Trailing-Edge - PDP-10 Archives - decuslib10-02 - 43,50145/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