[unix-history] / .ref-6294d633e80db8e89697db796e6f6025d5af0cae / usr / src / usr.bin / f77 / libU77 / test / rngtst.f

C
C Copyright (c) 1980 The Regents of the University of California.
C All rights reserved.
C
C %sccs.include.proprietary.f%
C
C	@(#)rngtst.f	5.2 (Berkeley) %G%
C

	double precision dflmax, dflmin
	write(*,*) flmax(), flmin(), inmax(), dflmax(), dflmin()
	end
Commit	Line	Data
82492b51 KB	1	C
	2	C Copyright (c) 1980 The Regents of the University of California.
	3	C All rights reserved.
	4	C
	5	C %sccs.include.proprietary.f%
	6	C
	7	C @(#)rngtst.f 5.2 (Berkeley) %G%
	8	C
	9
ca4b4979 KB	10	double precision dflmax, dflmin
	11	write(,) flmax(), flmin(), inmax(), dflmax(), dflmin()
	12	end