.ENABLE SUBSTITUTION

MAC S3D, S3D/-SP = S3D

	.IF <EXSTAT> <> <SUCCES> .GOTO PURGE

TKB @S3DBLD

.PURGE:

PUR S3D.*