LSR SP3 30x30 DIVIDE BY BINOM. THEOREM.
0r,ta55r	td9r	td6r	td11r	ao9r	td78r	ca0	dmza1	cp74r
ca0	10r,srh15	ad0	sft	ts1t	slh15	ext	ad56r	td21r
ca1za1	srh15	20r,adza1	slh0	ts1za1	slh15	srr2	tsza1	cst
mr1za1	dv1t	slr13	30r,adza1	ex1za1	ts2t	dv1t	slh15	tsza1	mh1t	ts3t
slh15	srr2	40r,tst	ca2t	su3t	slh13	sut	ad1za1	dv1t	slh2	ts1za1
slh15	50r,ex1za1	adza1	tsza1	mr1za1	cp58r	sp0	0.01000	0.77777
caza1	cp67r	60r,su1	tsza1	ca1za1
ad57r	ad1	ts1za1	sp55r	ad1	tsza1	ca1za1	
70r,su57r	su1	ts1za1	sp55r	dm0	cp78r	ca1	dv0
ca0	dm1za1	80r,cp76r	sp9r
END OF SUBROUTINE
