GOOF----LE-8-2.0L]�4h�]
gguile�	

�	gdefine-module*�	�	�	gsrfi�	gsrfi-11�	�		gfilenameS�	
fsrfi/srfi-11.scm�	gexportsS�	g
let-values�	
glet*-values�	
�	gset-current-module�	�	�	gcond-expand-provide�	gcurrent-module�	
�	gmake-syntax-transformer�	�	�	gmacro�	g$sc-dispatch�	�	�	g
_�	gany�	�	
�	 geach-any�	! ��	"!��	#"��	$g
syntax-object�	%gcall-with-values�	&gtop�	'&
�	(gribcage�	)gbinds�	*gexp�	+gb0�	,gb1�	-)*+,�	.''''�	/fl-46961e50cb-93�	0fl-46961e50cb-94�	1fl-46961e50cb-95�	2fl-46961e50cb-96�	3/012�	4(-.3�	5(�	6g
x�	76
�	8'
�	9fl-46961e50cb-90�	:9
�	;(78:�	<'45;�	=ghygiene�	>=�	?$%<>�	@glambda�	A$@<>�	B !��	CB��	D  �	Eglet�	Fgid�	Ggtmp�	HFG�	I''�	Jfl-46961e50cb-af�	Kfl-46961e50cb-b0�	LJK�	M(HIL�	Nglp�	Ogclauses�	Pgids�	Qgtmps�	RNOPQ�	Sfl-46961e50cb-a3�	Tfl-46961e50cb-a4�	Ufl-46961e50cb-a5�	Vfl-46961e50cb-a6�	WSTUV�	X(R.W�	Ygclause�	ZY+,�	['''�	\fl-46961e50cb-9d�	]fl-46961e50cb-9e�	^fl-46961e50cb-9f�	_\]^�	`(Z[_�	a'5M5X`5;�	b$Ea>�	cgmap�	dc�	ec�	fglist�	ggsyntax-violation�	hg�	ig�	jf-source expression failed to match any pattern�	k �	lggenerate-temporaries�	m   �	ngappend�	on�	pn�	qginner�	rq
�	sfl-46961e50cb-c7�	ts
�	u(r8t�	vgnew-tmp�	wvFG�	xfl-46961e50cb-bf�	yfl-46961e50cb-c0�	zfl-46961e50cb-c1�	{xyz�	|(w[{�	}gvar�	~}*�	fl-46961e50cb-b8��fl-46961e50cb-b9�����(~I���'5u55|�5X`5;��$%�>��$@�>�����geach�������  ��
��gargs��q���fl-46961e50cb-e2��fl-46961e50cb-e3������(�I���gnew-var��v�FG��fl-46961e50cb-d7��fl-46961e50cb-d8��fl-46961e50cb-d9��fl-46961e50cb-da��������(�.���gvars���*��fl-46961e50cb-d0��fl-46961e50cb-d1������(�I���'5�55��5X`5;��$%�>��$@�>�� �������gdummy��gbody������gm-46961e50cb-104���&���'��fl-46961e50cb-109��fl-46961e50cb-10a������(������
��fl-46961e50cb-106���
��(7����'�5���$E�>���������� �������gvars-1��g	binding-1��gvars-2��g	binding-2�����������'''''��fl-46961e50cb-10f��fl-46961e50cb-110��fl-46961e50cb-111��fl-46961e50cb-112��fl-46961e50cb-113��fl-46961e50cb-114����������(�����'�5���$%�>��$@�>��$
�>�C5
h@r]4	
54>
"G4i4i5>"G4#?Ah ^]

���CVgbinds
		gexp		gb0			gb1						
CCDbefh;]
4
5LL
���C3gid
		gtmp					
Cijklmp��h8�]4LL
�4
L
54
55LC�gnew-tmp
		5gid		5gtmp			5gtmp			5gfilenamefsrfi/srfi-11.scm�		W	'��		W	+��		W	'��		W	��		5	
Cijh@�]4
5
LL
45$LL
O@6�gvar
		=gexp		=gtmp			=gtmp			=gfilenamefsrfi/srfi-11.scm�		S	-��		S	��		=	
C�lh �]4

5
��4L
5
�Cgid
		grest		gfilenamefsrfi/srfi-11.scm�		c	,��		b	+��		a	$��		d	+��		a	$��			
Clh0�]	4
5

$LO

@4
5
��
C�gvars
		0gtmp		0gfilenamefsrfi/srfi-11.scm�
	^	��	!	g	/��	+	f	.��	,	e	'��	/	h	.��		0
gnameglp�C�p�h*]
C"gid
		
		
C�ho]4L
5
�Cggid
		
grest		
gfilenamefsrfi/srfi-11.scm�		r	=��		q	7��		
	
Cijh@�]4
5

$
@4
5$LO
@6~gtmps
		>gtmp		>gtmp		"	>gfilenamefsrfi/srfi-11.scm�
	n	&��		>
gnameglp�C��h ?]
L
C7ginner
		gargs					
Cijh`�]4LL
�4

54
55O
Q45
45$LO
@6�gnew-tmp
		]gnew-var		]gid			]gtmp			]glp		$	3gtmp		6	]gtmp		A	]gfilenamefsrfi/srfi-11.scm�		k	'��		k	+��		k	'��	$	n	&��	6	k	��		]	
CijhP�]
O
Q45
LL
45$LL
O@6�gvars
		Kgexp		Kglp		
	gtmp		 	Kgtmp		+	Kgfilenamefsrfi/srfi-11.scm�	
	^	��	 	]	��		K	
C
h�
](0
4
5$
L
LO@6�4
5$
LO@4
5$	
LO@6�gclauses
	�gids	�gtmps		�gtmp			8gtmp			8gtmp		;�gtmp		F�gtmp		h�gfilenamefsrfi/srfi-11.scm�
	I	��		L		��		M	
��	;	Q	��	;	Q	
��	�	
gnameglp�Ch �]
O
Q6�gclause
		gb0		gb1			glp			gfilenamefsrfi/srfi-11.scm�		I	��		J	��		K	��		I	��			
Cijh@t]4
5

$
@4
5$@6lg
x
		9gtmp		9gtmp		"	9gfilenamefsrfi/srfi-11.scm�
	C	��		9
C5R4
��h?]

��C7gdummy
		
gbody		
		
	
C����efh(�]

45��C�gdummy
		(gvars-1		(g	binding-1			(gvars-2			(g	binding-2			(gbody			(		(	
Cijh@
]4
5

$
@4
5$@6�g
x
		9gtmp		9gtmp		"	9gfilenamefsrfi/srfi-11.scm�
�	��		9
g
macro-typegsyntax-rules�gpatternsgbodyg...gvars-1g	binding-1gvars-2g	binding-2g...gbodyg...C5
RCjg
m
		(
gfilenamefsrfi/srfi-11.scm�		&
��	)	)
��	.	)	��	6	)	&��	;	)
��	=

C6