Google
 

Trailing-Edge - PDP-10 Archives - decus_20tap4_198111 - decus/20-0119/master.for
There is 1 other file named master.for in the archive. Click here to see a list.
00100	C   READS THE MASTER BOOKKEEPING FILE
00200	1	CALL GET(I,J,K)
00300		Q=J
00400		R=K
00500		B=100.*(R-Q)/R
00600		TYPE 100,I,J,K,B
00700	100	FORMAT(1X,I6,' USES'/1X,I6,' MASTER BLKS'/
00800		11X,I6,' DSK BLKS'/1X,G,'%BETTER')
00900		END