|||||||||||||||||||||||||
LSR FU 3 LN x
za1={61}
0,ita32r	1,OUT	2,ca33r	3,ex2042	4,su33r	5,sf35r
6,tst	7,cs35r	8,ad34r	9,slh15-za1	10,ts1t	11,IN
|||||||||||||||||||||||||
12,isu36r	13,its2t	14,imr40r	15,iad42r	16,imr2t	17,iad44r
18,imr2t	19,iad46r	20,imr2t	21,iad48r	22,imr2t	23,iad50r
|||||||||||||||||||||||||
24,imr2t	25,iad52r	26,imr2t	27,iad54r	28,imr2t	29,iext
30,imr38r	31,iadt	32,isp0	33,+1	34,+15	35,+0
|||||||||||||||||||||||||
MULTIPLE
36,+1.		38,+.6931471806		40,-.0064535442
42,+.0360884937		44,-.0953293897		46,+.1676540711
48,-.2407338084		50,+.3317990258		52,-.4998741238
54,+.9999964239
|||||||||||||||||||||||||
END OF SUBROUTINE
{61}