str

reloc
entry str

str,	ial
	add (tra-llr+2
	sto x
	clad (400777
	cry
	alo
	add (400177
	cry
	alo
	add (400037
	cry
	alo
	add (400007
	cry
	alo
	add (400001
	cry
	llr (222222
	ana-10
	cyl
x,	xx

const
start

sqz

reloc
entry sqz

sqz,	ial
	add (tra-llr+2
	sto xt
	clad (333330
	cry
	alo
	add (333330
	cry
	alo
	add (333360
	cry
	alo
	add (333000
	cry
	alo
	add (333000
	cry
	llr (400037
	ana-10
xt,	xx

const
start
v