Google
 

Trailing-Edge - PDP-10 Archives - BB-R775C-BM - uetp/lib/rmtok.utl
There are 16 other files named rmtok.utl in the archive. Click here to see a list.
!
!			  COPYRIGHT (c) 1983 BY
!	      DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
!
OPEN REPORT RMTOK.REP

OPEN RMS RMTF1.RMS
INFO ALL
DISPLAY BUCKET LARGEST
SET INDEX 1
SET BUCKET DATA
DISPLAY BUCKET ENTRY 1,2 3
DISPLAY DATA
DISPLAY DATA REL 3 4
DISPLAY R1K1,R1AK1 KEY "DDD" (TO) "GGGGG" (AND) R1AK2="11111"
DISPLAY PROLOGUE
VERIFY KEY 0
VERIFY SECONDARY
CLOSE RMS

OPEN RMS RMTF2.RMS OUTPUT
DISPLAY DATA
VERIFY
CLOSE RMS

CLOSE REPORT