LSR FU 2b (30-j,j) SQUARE ROOT
za1={61}	za2={61}
0r,ita26r	its+za1	OUT	ca2043	dm0	cp25r	ab0	cp0
ao2042	srh1	ts2042	sp12r	ta22r	IN	its+za2	ica+za1	idv+za2
iad+za2	OUT	ca2042	su1	ts2042	sp	sp12r	sp12r	IN
isp
END OF SUBROUTINE
||||||||||
{61}m