COMMENT ⊗   VALID 00003 PAGES VERSION 17(3)
RECORD PAGE   DESCRIPTION
 00001 00001
 00002 00002	HISTORY
 00003 00003		TITLE	TLR
 00004 ENDMK
⊗;
COMMENT ⊗HISTORY
AUTHOR,REASON
021  002100000003  ⊗;


COMMENT ⊗
VERSION 17(3) 7-26-73 BY RHT VERSION 17 GOES IN
VERSION 15-6(2) 1-14-72 BY DCS BUG #GA# REPLACE .REL BY .SEG AS SEGMENT EXTENSION
VERSION 15-2(1) 12-2-71 BY DCS INSTALL VERSION NUMBER

⊗;
	TITLE	TLR
INTERN SLOF,MYFIL,LOCSM

SLOF:	SLOFIL
	SIXBIT	/REL/
	0↔0			;FOR LOW SEGMENT MODIFICATION

MYFIL:	FILXXX			;UPPER SEGMENT NAME
NOEXPO <
	SIXBIT	/SEG/
>;NOEXPO
EXPO <
	SIXBIT	/SHR/
>;EXPO
	0↔0			;REST OF LOOKUP BLOCK

LOCSM:	LOCSYM			;TAILORS UP.FAI ROUTINES

	END