File: DVTEST.FT of Disk: Disks/MyPDP/m8-backup-rka1-rkb1

(Source file text) 

---

	MODE=1+8
	IRANGE=0+4
	IVAL=9999
10	CALL DVINP(MODE,IRANGE,IERR,IVAL)
	WRITE(0,1000) MODE,IRANGE,IERR,IVAL
1000	FORMAT(X,4I8)
	GOTO 10
	END

---