	PROGRAM TSXTST
C
C TSXTST.FOR	NAB/1738/SNLA	01-APR-81/03-APR-81.
C
C TEST THE TSX-PLUS EMT ROUTINES IN TSXLIB.
C
	TYPE 1
    1	FORMAT(' TSXTST:  81D03A')
C
	CALL TSXMSC
C
	STOP 'TSXMSC'
	END
