/*********************************************************************
/ MML detail (8) part D
/*********************************************************************
#define 	_REF_A
#define 	_REF_1
#include	"chop_d1.mml"
#undef		_REF_1
/
#define 	_REF_2
#include	"chop_d1.mml"
#undef		_REF_A
/
#define 	_REF_B
#include	"chop_d2.mml"
#include	"chop_d1.mml"
#undef		_REF_2
/
#define 	_REF_3
#include	"chop_d2.mml"
#include	"chop_d1.mml"
#undef		_REF_3
#undef		_REF_B
/---------------------------------------------------------------------
.next
	t200o5l8	v6	d-&e-&]#2d-&c&]#3d-&d&]#3
		o4l8	r2r4
		o3l8	r2r4
				r2r4
		o4l4	v6	r]#2d-]#3d-]#3
		o3l4	v6	r]#2g-]#3g-]#3
		o3l4	v7	r2r4
		o2l4q8	v6	b-2.]
.next
	f2&[#4e-4[#4
	r2r4
	r2r4
	r2r4
	re-[#4e-[#4
	ra-[#4a-[#4
	rg-[#4g-[#4
	brr[
.next
	<a-&b-&]#2a-&g&]#3a-&a&]#3
	r2r4
	r2r4
	r2r4
	<r]#2b]#3b
	r]#2f]#3f
	r2r4
	>d-2.]
.next
	b-4&['5g-b-&]#2b&>c]#2
	r2r4
	r2r4
	r2r4
	r[#5b-]#2b-
	r[#5d-]#2d-
	r2r4
	<g-rr[#4
.next
	{d-&e-&d-&} c&]#2	d-&b-]#2a-&g-
	r2r4
	r2r4
	r2r4
	>r]#4d-]#2d-
	r]#4g-]#2g-
	r2r4]
	b-2.]#4
.next
	f2&[#4e-4[#4
	r2r4
	r2r4
	r2r4
	re-[#4e-[#4
	ra-[#4a-[#4
	rg-[#4g-[#4
	brr[
.next
	<{a-&b-&a-&}4	g&a-&b&b-
	r2r4
	r2r4
	r2r4
	<rbb
	rff
	r2r4
	>d-2.
.next
	'5g-c&d-&f&g-&b-
	r2r4
	r2r4
	r2r4
	rb-b-
	rd-d-
	r2r4
	<g-rr
/---------------------------------------------------------------------
.next
	>d-&e-&]#2d-&c&]#3d-&d]#3
	r2r4
	r2r4
	r2r4
	>r]#2d-]#3d-]#3
	r]#2g-]#3g-]#3
	r2r4
	b-2.]
.next
	d16&f4..&e-4
	r2r4
	r2r4
	r2r4
	re-e-
	rga-
	r2r4
	brr
.next
	<a-&b-&]#2	{a-&b-&a-&} g&]#3	a-&a&]#3
	r2r4
	r2r4
	r2r4
	<r]#2b]#3b
	r]#2f]#3f
	r2r4
	>d-2.]
.next
	b-4&['5g-b-&]#4b&>c]#4
	r2r4
	r2r4
	r2r4
	r[#5b-]#4b-]#4
	r[#5d-]#4d-]#4
	r2r4
	<g-rr
.next
	t180{d-&e-&d-&} c&	t144l12 d-&b'5b- b-&a-&g-	l8
		r4					r2
		r4					r2
		r4					r2
		>r					d-d-
		r					g-g-
		r4					r2]]
		b-2.
.next
	t180!+1f2&e-4
		r2r4
		r2r4
		r2r4
		re-e-
		ra-a-
		rg-g-
		brr
.next
	t200<{a-&b-&a-&}4	g&a-&b&b-
		r2r4
		r2r4
		r2r4
		<rbb
		rff
		r2r4
		>d-2.
.next
	q5	g-4r4	t260v9	b-b-
	r2					r4
	r2					r4
	r2					r4
	rb- 			v9	r
	rd- 			v9	r
	r2				v9	r4
	<g-r			v9	r
.next
	b-4r4		[b-b-
	r2r4
	r2r4
	r2r4
	rr			[>!+1f&
	rr			[!+1b-
	<'5b-r		[>!+1a-&
	<'5b-rr
.next
	b-4r4b-b-
	r2r4
	r2r4
	r2r4
	er!+1e-&
	b-r!+1b-
	gr!+1g-&
	r2r4
.next
#define 	A	b-b-b-4
	b-4 	v11 		>$A
	r4		v11 o4q5	$A
	r2r4
	r2r4
	d			rr
	b-			rr
	f		v11 l8q5	<$A
	r		v11 l8q5	$A
.next
#define 	A	b-b-b-4b-b-
	$A
	$A
	r2r4
	r2r4
	r2r4
	r2r4
	$A	l4
	$A	l4
.next
	b-4r4	t240v6	<b-b-
	b-4r4		v6	'8f4
	r2		o3q5v6	b-b-
	r2r4
	r2			v6	<!+1a-&
	r2			v6	<!+1b-&
	b-rr	q8
	b-rr	q8
.next
	b-4r4b-b-
	e4r4e-4
	b-4r4b-b-
	r2r4
	gr!+1g-&
	b-r!+1b-&
	r2r4
	r2r4
.next
	t260b-4]#4b-b-]#4b-4]#4
		d4r2
		b-4]#4b-b-]#4b-4]#4
		r2r4
		frr
		b-rr
		r2r4
		r2r4
.next
	b-b-]#4b-4]#4b-b-	q8
	r2r4	q8
	b-b-]#4b-4]#4b-b-	q8
	r2r4
	r2r4
	r2r4
	r2r4
	r2r4
/---------------------------------------------------------------------