Uname: Linux web3.us.cloudlogin.co 5.10.226-xeon-hst #2 SMP Fri Sep 13 12:28:44 UTC 2024 x86_64
Software: Apache
PHP version: 8.1.31 [ PHP INFO ] PHP os: Linux
Server Ip: 162.210.96.117
Your Ip: 18.191.22.207
User: edustar (269686) | Group: tty (888)
Safe Mode: OFF
Disable Function:
NONE

name : srfi-43.go
GOOF----LE-8-2.0&�]t4h�]gguile�	�	gdefine-module*�	�	�	gsrfi�	gsrfi-43�	�		gfilenameS�	
fsrfi/srfi-43.scm�	gimportsS�	gsrfi-1�	
�	
�	gsrfi-8�	�	�	�	gexportsS�	g
vector-empty?�	gvector=�	g
vector-unfold�	gvector-unfold-right�	gvector-reverse-copy�	g
vector-append�	gvector-concatenate�	gvector-fold�	gvector-fold-right�	g
vector-map�	gvector-map!�	gvector-for-each�	 gvector-count�	!gvector-index�	"gvector-index-right�	#gvector-skip�	$gvector-skip-right�	%gvector-binary-search�	&g
vector-any�	'gvector-every�	(gvector-swap!�	)gvector-reverse!�	*gvector-copy!�	+gvector-reverse-copy!�	,greverse-vector->list�	-greverse-list->vector�	. !"#$%&'()*+,-�	/g
re-exportsS�	0gmake-vector�	1gvector�	2gvector?�	3g
vector-ref�	4gvector-set!�	5g
vector-length�	6012345�	7greplacementsS�	8gvector-copy�	9gvector-fill!�	:glist->vector�	;gvector->list�	<89:;�	=gset-current-module�	>=�	?=�	@gcond-expand-provide�	Agcurrent-module�	B�	Cgerror�	Dg
string-append�	Egsymbol->string�	Ff: �	Gg
error-from�	Hgmake-syntax-transformer�	IH�	JH�	Kgassert-nonneg-exact-integer�	Lgmacro�	Mg$sc-dispatch�	NM�	OM�	Pgany�	QPPP�	Rg
syntax-object�	Sgunless�	Tgtop�	UT�	Vgribcage�	Wgdummy�	Xgk�	Ygwho�	ZWXY�	[gm-46961e513c-7�	\[T�	]\UU�	^fl-46961e513c-c�	_fl-46961e513c-d�	`fl-46961e513c-e�	a^_`�	bVZ]a�	cV�	dgx�	ed�	f\�	gfl-46961e513c-9�	hg�	iVefh�	jUbci�	kghygiene�	lk�	mRSjl�	ngand�	oRnjl�	pgexact-integer?�	qRpjl�	rgnot�	sRrjl�	tg	negative?�	uRtjl�	vRGjl�	wf(expected non-negative exact integer, got�	xRwjl�	ygsyntax-violation�	zy�	{y�	|f-source expression failed to match any pattern�	}gassert-procedure�	~gf�	W~Y��gm-46961e513c-13���T���UU��fl-46961e513c-18��fl-46961e513c-19��fl-46961e513c-1a�������V�������fl-46961e513c-15�����Ve����U�c���RS�l��g
procedure?��R��l��RG�l��fexpected procedure, got��R��l��g
assert-vector��gv��W�Y��gm-46961e513c-1f���T���UU��fl-46961e513c-24��fl-46961e513c-25��fl-46961e513c-26�������V��������fl-46961e513c-21�����Ve����U�c���RS�l��R2�l��RG�l��fexpected vector, got��R��l��gassert-valid-index��PPPP��gi��glen��W��Y��gm-46961e513c-2b���T���UUU��fl-46961e513c-30��fl-46961e513c-31��fl-46961e513c-32��fl-46961e513c-33��������V��������fl-46961e513c-2d�����Ve����U�c���RS�l��Rn�l��Rp�l��g<=��R��l��R
�l��RG�l��f
invalid index��R��l��gassert-valid-start��gstart��W��Y��gm-46961e513c-39���T���UUU��fl-46961e513c-3e��fl-46961e513c-3f��fl-46961e513c-40��fl-46961e513c-41��������V��������fl-46961e513c-3b�����Ve����U�c���RS�l��Rn�l��Rp�l��R��l��R
�l��RG�l��finvalid start index��R��l��gassert-valid-range��PPPPP��gend��W���Y��gm-46961e513c-47���T���UUUU��fl-46961e513c-4c��fl-46961e513c-4d��fl-46961e513c-4e��fl-46961e513c-4f��fl-46961e513c-50���������V��������fl-46961e513c-49�����Ve����U�c���RS�l��Rn�l��Rp�l��R��l��R
�l��RG�l��finvalid index range��R��l��gassert-vectors��glet��gvs��W�Y��gm-46961e513c-57���T���UU��fl-46961e513c-5c�fl-46961e513c-5d�fl-46961e513c-5e���V�����fl-46961e513c-59��Ve�Uc�	R�l�
gloop�R
l�RSl�
gnull?�R
l�R�l�gcar�Rl�gcdr�Rl�gmin�g
min-length�greverse!�gvectors-ref�gapply�8�8�gguile-vector-copy�gvector-move-left!�g%vector-concatenate�9�9� g%vector-reverse!�!gdefine-vector-copier!�"gdefine�#gcopy!�$g	docstring�%g
inner-proc�&W#$%�'gm-46961e513c-5ea�('T�)(UUU�*fl-46961e513c-5ef�+fl-46961e513c-5f0�,fl-46961e513c-5f1�-fl-46961e513c-5f2�.*+,-�/V&).�0(�1fl-46961e513c-5ec�21�3Ve02�4U/c3�5R"4l�6R�4l�7g%copy!�8R74l�9gcase-lambda�:R94l�;gtarget�<R;4l�=gtstart�>R=4l�?gsource�@R?4l�A<>@�BR�4l�Cgquote�DRC4l�Egtlen�FRE4l�GR54l�HG<�IFH�Jgslen�KRJ4l�LG@�MKL�NIM�OR�4l�PRS4l�Qg>=�RRQ4l�Sg+�TRS4l�UT>K�VRFU�WRG4l�Xfwould write past end of target�YRX4l�ZY�[R
4l�\8<>@[K�]\�^gsstart�_R^4l�`<>@_�ag-�bRa4l�cbK_�dT>c�eRFd�f8<>@_K�gf�hgsend�iRh4l�j<>@_i�kR�4l�lbi_�mT>l�nRFm�o8<>@_i�po�qgvector-move-right!�rglength�sgdrop�C5hh�l]4	
./67<54?>"G4@i4Ai5B>"GCDEFh �-134455@�gwho
			gmsg			gargs				gfilenamefsrfi/srfi-43.scm�
	+
��		-		��		-	��		-	-��		-		��		,	��				
	gnameg
error-from�CGR4JKLOQmoqsuvxh0M]CEgdummy
		+gk		+gwho			+		+	C{|h(�]	45$@6�gx
		"gtmp		"gfilenamefsrfi/srfi-43.scm�
	0
��		"g
macro-typegsyntax-rules�gpatternsgkgwhoC5KR4J}LOQ����h M]CEgdummy
		gf		gwho						C{|h(�]	45$@6�gx
		"gtmp		"gfilenamefsrfi/srfi-43.scm�
	5
��		"g
macro-typegsyntax-rules�gpatternsgfgwhoC5}R4J�LOQ����h M]CEgdummy
		gv		gwho						C{|h(�]	45$@6�gx
		"gtmp		"gfilenamefsrfi/srfi-43.scm�
	9
��		"g
macro-typegsyntax-rules�gpatternsgvgwhoC5�R4J�LO��������h0^]CVgdummy
		*gi		*glen			*gwho			*		*	C{|h(�]	45$@6�gx
		"gtmp		"gfilenamefsrfi/srfi-43.scm�
	=
��		"g
macro-typegsyntax-rules�gpatternsgiglengwhoC5�R4J�LO��������h0b]CZgdummy
		*gstart		*glen			*gwho			*		*	C{|h(�]	45$@6�gx
		"gtmp		"gfilenamefsrfi/srfi-43.scm�
	B
��		"g
macro-typegsyntax-rules�gpatternsgstartglengwhoC5�R4J�LO��������h8s]Ckgdummy
		5gstart		5gend			5glen			5gwho			5		5	C{|h(�]	45$@6�gx
		"gtmp		"gfilenamefsrfi/srfi-43.scm�
	G
��		"g
macro-typegsyntax-rules�gpatternsgstartgendglengwhoC5�R4J�LOQ	h@N]CFgdummy
		:gvs		:gwho			:		:	C{|h(�]	45$@6�gx
		"gtmp		"gfilenamefsrfi/srfi-43.scm�
	M
��		"g
macro-typegsyntax-rules�gpatternsgvsgwhoC5�R5h@]"#(C�44�55"����4�5"����gvs
		<gvs		)gresult			)gfilenamefsrfi/srfi-43.scm�
	U
��		V	��		X	��		Z	��		Z	��		Z	#��		Z	2��		Z	#��	!	Z	��	)	Z	��	)	V	��	,	V	��	-	W	��	2	W	$��	4	W	��	<	V	��		<gnameg
min-length�CRh8�]" (6����"���"����gvs
		1gi		1gvs			&gxs			&gfilenamefsrfi/srfi-43.scm�
	]
��		^	��		_	��		`	��		a	��		a	)��		a	��		a	��	&	a	��	&	^	��	)	^	��	1	^	��
		1	gnamegvectors-ref�CR�G�wp0h8�]L�$C4L>GL��"����gi
		5gseed		5gx			5gseed			5gfilenamefsrfi/srfi-43.scm�
	{	��		|	��		|		��		}	��		}	��	(	~	
��	+		��	5		
��			5	gnamegloop�Ch@�]L�$C4L>GL��"����gi
		=gseed1		=gseed2			=gx			=gseed1			=gseed2			=gfilenamefsrfi/srfi-43.scm�
�	��	�	��	�		��	�	$��	�	��	,�	
��	/�	��	=�	
��			=	gnamegloop�Ch8�]L�$C4L>GL��"����gi
		7gseeds		7gx			7gseeds			7gfilenamefsrfi/srfi-43.scm�
�	��	�	��	�		��	�	 ��	�	��	*�	
��	-�	��	7�	
��			7	gnamegloop�Ch�s)�345$"4>"G"4>"*G"#45$
�$"���"""���45""�$"45��"���
"���C)�345$"4>"G"4>"*G"#45$
�$"���"""���45OQ4
>"GC)�345$"4>"G"4>"*G"#45$
�$"���"""���45	OQ4
>"GC-1345$"4>"G"4>"*G"#45$
�$"���"""���45
OQ4
>"GCkgf
		�glen		�gv		v�gi		|�gf
�Oglen�Ogseed	�Ogv	Ogloop	+Lgf
X�glenX�gseed1	X�gseed2	X�gv	��gloop	��gf
�glen�gseeds	�gv	n�gloop	{�gfilenamefsrfi/srfi-43.scm�
	e	��	
	o	��		o	��		o	��	3	p	��	7	p	&��	9	p	��	p	q	��	v	q	��	|	r	���	s	���	s		���	t	���	t	���	u	���	u	���	r	���	e	���	x	���	x	���	x	���	y	���	y	&���	y	��	z	��	z	��+	{	��X	e	��Y�	��l�	��n�	����	����	&����	����	����	����	��	e	���	���	���	��+�	��/�	&��1�	��h�	��n�	��{�	��0		�	�O	X�	�	
	gnameg
vector-unfold�g
documentationf�(vector-unfold f length initial-seed ...) -> vector

The fundamental vector constructor.  Create a vector whose length is
LENGTH and iterates across each index k from 0 up to LENGTH - 1,
applying F at each iteration to the current index and current seeds, in
that order, to receive n + 1 values: the element to put in the kth slot
of the new vector, and n new seeds for the next iteration.  It is an
error for the number of seeds to vary between iterations.�CR�G�wp0h8�]
�$C4L>GL��"����gi
		4gseed		4gx			4gseed			4gfilenamefsrfi/srfi-43.scm�
�	��	�	��	
�		��	
�	��	�	��	'�	
��	*�	��	4�	
��			4	gnamegloop�Ch@�]
�$C4L>GL��"����gi
		<gseed1		<gseed2			<gx			<gseed1			<gseed2			<gfilenamefsrfi/srfi-43.scm�
�	��	�	��	
�		��	
�	$��	�	��	+�	
��	.�	��	<�	
��			<	gnamegloop�Ch8�]
�$C4L>GL��"����gi
		6gseeds		6gx			6gseeds			6gfilenamefsrfi/srfi-43.scm�
�	��	�	��	
�		��	
�	 ��	�	��	)�	
��	,�	��	6�	
��			6	gnamegloop�Ch��)�345$"4>"G"4>"*G"#45$
�$"���"""���45"!
�$"45��"����"���C)�345$"4>"G"4>"*G"#45$
�$"���"""���45OQ4�>"GC)�345$"4>"G"4>"*G"#45$
�$"���"""���45	OQ4�>"GC-1345$"4>"G"4>"*G"#45$
�$"���"""���45
OQ4�>"GC�gf
		�glen		�gv		v�gi		|�gf
�Oglen�Ogseed	�Ogv	Ogloop	+Lgf
X�glenX�gseed1	X�gseed2	X�gv	��gloop	��gf
�glen�gseeds	�gv	m�gloop	y�gfilenamefsrfi/srfi-43.scm�
�	��	
�	��	�	��	�	��	3�	��	7�	&��	9�	��	p�	��	v�	��	|�	��	�	����		����	����	����	����	����	����	����	����	����	����	����	����	����	&����	���	���	��+�	��:�	��A�	��X�	��Y�	��l�	��n�	����	����	&����	����	����	����	����	����	���	���	���	���	��*�	��.�	&��0�	��g�	��m�	��y�	����	����	��8		�	�O	X�	�	
	gnamegvector-unfold-right�g
documentationf�(vector-unfold-right f length initial-seed ...) -> vector

The fundamental vector constructor.  Create a vector whose length is
LENGTH and iterates across each index k from LENGTH - 1 down to 0,
applying F at each iteration to the current index and current seeds, in
that order, to receive n + 1 values: the element to put in the kth slot
of the new vector, and n new seeds for the next iteration.  It is an
error for the number of seeds to vary between iterations.�CRRG8�5�p0�h��)	36)�3�$"4>"G45"4>";G"445$%
�$�$""���""���""���4�54	
>"GC-.,3#�$"4>"G45"4
>"NG"G45$845$%
�$�$""���""���""���""���4�54	45
>"GC�gv
			gv
	�gstart	�glen		@�gresult	��gv
��gstart��gend	��gfill	��glen	��gresult	n�gfilenamefsrfi/srfi-43.scm�
�	��	�	��	�	��	�	��	(�	��	*�	��	:�	��	@�	��	G�	��	K�	$��	M�	����	����	!����	����	����	����	����	����	����	����	����	���	���	���	!���	���	���	��&�	��'�	��1�	��5�	��9�	��>�	��c�	��j�	!��n�	��n�	��q�	��x�	#����	��*				�	��	gnamegvector-copy�g
documentationf�(vector-copy vec [start [end [fill]]]) -> vector

Allocate a new vector whose length is END - START and fills it with
elements from vec, taking elements from vec starting at index START
and stopping at index END.  START defaults to 0 and END defaults to
the value of (vector-length VEC).  If END extends beyond the length of
VEC, the slots in the new vector that obviously cannot be filled by
elements from VEC are filled with FILL, whose default value is
unspecified.�C8R0hPe]#�45"%�$"$����"���
�"���C]gvec
		Jgstart		Jgend			Jglen			Jgresult			Jgi			;gj			;gfilenamefsrfi/srfi-43.scm�
�	��	�	��	�	��	
�	��	�	��	�	��	�	��	�	
��	,�	"��	-�	��	0�	��	3�	��	;�	��	;�	��	?�	��	G�	��		J	gnameg%vector-reverse-copy�CG�5�p�hx )23�$"4>"GL
456)�3�$"4>"G45"4>";G"445$%
�$�$""���""���""���L6]�$"4>"G45"4>"_G"X45$I45$6
�$&�$�$""���""���""���""���""���L6gvec
			8gvec
	A�gstart	A�glen		i�gvec
�ugstart�ugend	�uglen	�ugfilenamefsrfi/srfi-43.scm�
�	��	�	��	�	��	�	��	0�	#��	8�	��	A�	��	D�	��	Q�	��	S�	��	c�	��	i�	��	p		��	t	'��	v		���		����	���	���	���	���	���	���		���	+���		��u		��			8	A�	�u	g
documentationf1(vector-reverse-copy vec [start [end]]) -> vector

Allocate a new vector whose length is END - START and fills it with
elements from vec, taking elements from vec in reverse order starting
at index START and stopping at index END.  START defaults to 0 and END
defaults to the value of (vector-length VEC).�COR50h��]1""("!�4�5�"���
"���45"G("H�454
>"G��"���
"���C�gvs
	�gvs		(glen			(g
result-len	3�gresult		<�gvs		B�gpos		B�gv		O�glen		X�	gfilenamefsrfi/srfi-43.scm�

��			��	
	��		!��		1��		@��		1��	 	*��	(	��	(		��	3		��	6
	��	<		��	B	��	H	��	O	��	O	��	R	��	X	��	[	
��	v	��	{	���	
���	��	�gnameg%vector-concatenate�CRG�50	h0�)3C)*3�$"4>"G6)�3�$"4>"G�$"4>"G45454�54

>"G4
>"GC-13"6("4��$"4�>"G�"���"���6�gv
		=gv1
	F�gv2	F�glen1	��glen2	��gresult	��gvs
�+gvs�gfilenamefsrfi/srfi-43.scm�
	��		��		��		��	&	��	(	��	=	��	F	��	I!	��	V!	��	X!	��	j"	��	w"	��	y"	���#	���$	���#	���%	���%	"���%	���%	���&		���'		���	���*	��*	��*	��++	��			
		=	F�	�+


gnameg
vector-append�g
documentationf�(vector-append vec ...) -> vector

Return a newly allocated vector that contains all elements in order
from the subsequent locations in VEC ...�CRG�hPJ]	"6("4��$"4�>"G�"���"���6Bgvs
		Jgvs		<gfilenamefsrfi/srfi-43.scm�
-
��	2	��	!2	��	#2	��	J3	��		Jgnamegvector-concatenate�g
documentationf�(vector-concatenate list-of-vectors) -> vector

Append each vector in LIST-OF-VECTORS.  Equivalent to:
  (apply vector-append LIST-OF-VECTORS)�CRG�5h0]�$"4>"G45
�Cgvec
		-gfilenamefsrfi/srfi-43.scm�
5
��	9	��	9	��	9	��	$:		��	+:	��		-gnameg
vector-empty?�g
documentationfd(vector-empty? vec) -> boolean

Return true if VEC is empty, i.e. its length is 0, and false if not.�CR5h(�](C4�5�$
�"���C�glen
		(gvs		(gfilenamefsrfi/srfi-43.scm�
>	��	?	��		?	
��	
@	��	@	%��	@	��	@	��	@	
��	A	#��	&A	��		(	gnamegall-of-length?�COhP-]
�$C��&"	45$�"���C%gi
		Pgelt=?		Pgv1			Pgv2			Pgt			Pgx1			Pgx2			Pgfilenamefsrfi/srfi-43.scm�
B	��	C	
��	C	��	D	��	E	��	D	
��	'F	��	(F	��	-F	!��	9F	��	<G	��	NG	��
		P	gnameg=up-to?�COQQ�G��5h��)*345$"4>"GC)K345$"4>"G�$"4>"GC)�345$"4>"G�$"4>"G�$"4>"G4545�$
L�6C-1345$"4>"G�$"4>"G"6("4��$"4�>"G�"���"���454L5$2"&(C4L��5$	�"���C"���C�gelt=?
			0gelt=?
	9�gv	9�gelt=?
�gv1�gv2	�glen	�gelt=?
 �gv1 �gvs	 �gvs	j�glen	��gvs	��
gfilenamefsrfi/srfi-43.scm�
H	��	
R	��	R	��	R	��	9H	��	:U	��	MU	��	OU	��	aV	��	nV	��	pV	���H	���Y	���Y	���Y	���Z	���Z	���Z	���[	���[	���[	���\	���\	���]	��]	��]		��
^	��^	�� H	��!`	��4`	��6`	��Ha	��Ua	��Wa	��jb	���b	���b	���c	���c	���d	���d		���e	���f	���f	���g	���g	"���g	5���g	���g	���h	���h	���e	��6			0	9�	�	 �	
	g
documentationfu(vector= elt=? vec ...) -> boolean

Return true if the vectors VEC ... have equal lengths and equal
elements according to ELT=?.  ELT=? is always applied to two
arguments.  Element comparison must be consistent with eq?, in the
following sense: if (eq? a b) returns true, then (elt=? a b) must also
return true.  The order in which comparisons are performed is
unspecified.�COR�G��5
h)�345$"4>"G�$"4>"G45"%�$C�4�5"���
"���)�345$"4>"G�$"4>"G�$"4>"G445455"*�$C�4��5"���
"���-1345$"4>"G"6("4��$"4�>"G�"���"���45")�$C�44	5?"���
"���gkcons
		�gknil		�gv			�glen		V�gi		\�gstate		\�gkcons
�Jgknil�Jgv1	�Jgv2	�Jglen	Jgi	?gstate	?gkcons
S�gknilS�gvs	S�gvs	|�glen	��gi	��gstate	��gfilenamefsrfi/srfi-43.scm�
k	��	
v	��	v	��	v	��	1w	��	>w	��	@w	��	Px	��	Vx	��	\y	��	az	
��	ez		��	k|	��	l|	��	w|	*��	y|	���|	
���y	���k	���~	���~	���~	���	���	���	����	����	����	����	���	���	(���	���	���	���	
���		��$�	��%�	��0�	"��5�	4��7�	��?�	
��?�	��Sk	��T�	��g�	��i�	��|�	����	����	����	����	����	����	
����		����	����	����	0����	����	
����	��>		�	�J	S�	
	gnamegvector-fold�g
documentationf�(vector-fold kons knil vec1 vec2 ...) -> value

The fundamental vector iterator.  KONS is iterated over each index in
all of the vectors, stopping at the end of the shortest; KONS is
applied as (KONS i state (vector-ref VEC1 i) (vector-ref VEC2 i) ...)
where STATE is the current state value, and I is the current index.
The current state value begins with KNIL, and becomes whatever KONS
returned at the respective iteration.  The iteration is strictly
left-to-right.�CR�G��5
hg)�345$"4>"G�$"4>"G45"$
�$C�4�5"����"���)�345$"4>"G�$"4>"G�$"4>"G445455")
�$C�4��5"����"���-1345$"4>"G"6("4��$"4�>"G�"���"���45"(
�$C�44	5?"����"���_gkcons
		�gknil		�gv			�glen		V�gi		\�gstate		\�gkcons
�Lgknil�Lgv1	�Lgv2	�Lglen	Lgi	?gstate	?gkcons
U�gknilU�gvs	U�gvs	~�glen	��gi	��gstate	��gfilenamefsrfi/srfi-43.scm�
�	��	
�	��	�	��	�	��	1�	��	>�	��	@�	��	P�	��	V�	��	\�	��	_�	
��	d�		��	j�	��	k�	��	v�	*��	x�	����	
����	����	����	����	����	����	����	����	����	����	����	����	����	����	���	���	(���	���	���	���	
���		��$�	��%�	��0�	"��5�	4��7�	��?�	
��?�	��B�	��L�	��U�	��V�	��i�	��k�	��~�	����	����	����	����	����	����	
����		����	����	����	0����	����	
����	����	����	��D		�	�L	U�	
	gnamegvector-fold-right�g
documentationf�(vector-fold-right kons knil vec1 vec2 ...) -> value

The fundamental vector iterator.  KONS is iterated over each index in
all of the vectors, starting at the end of the shortest; KONS is
applied as (KONS i state (vector-ref VEC1 i) (vector-ref VEC2 i) ...)
where STATE is the current state value, and I is the current index.
The current state value begins with KNIL, and becomes whatever KONS
returned at the respective iteration.  The iteration is strictly
right-to-left.�CR�G��50h ~)�345$"4>"G�$"4>"G4545"'�$"!4�5��"���
"���C)�345$"4>"G�$"4>"G�$"4>"G44545545",�$"&4��5��"���
"���C-1345$"4>"G"6("4��$"4�>"G�"���"���4	545"+�$"%44
5?��"���
"���Cvgf
		�gv		�glen		V�gresult		_�gi		e�gf
�^gv1�^gv2	�^glen	^gresult	"^gi	(Tgf
ggvsggvs	��glen	�gresult	�gi	�gfilenamefsrfi/srfi-43.scm�
�	��	
�	��	�	��	�	��	1�	��	>�	��	@�	��	P�	��	V�	��	Y�	��	_�	��	e�	��	j�	��	n�		��	w�	!����	&����	!����	����	����	����	����	����	����	����	����	����	����	����	����	����	���	��
�	���	)���	���	���	��"�	��(�	��-�	��1�		��:�	!��C�	&��H�	8��J�	!��K�	��N�	��T�	��T�	��g�	��h�	��{�	��}�	����	����	����	����	����	����	����	����	����	����		����	!����	,���	!���	��	�	���	���	��G		�	�^	g
gnameg
vector-map�g
documentationf(vector-map f vec2 vec2 ...) -> vector

Return a new vector of the shortest size of the vector arguments.
Each element at index i of the new vector is mapped from the old
vectors by (F i (vector-ref VEC1 i) (vector-ref VEC2 i) ...).  The
dynamic order of application of F is unspecified.�CR�G��5
h��)�345$"4>"G�$"4>"G45"%�$C4�5��"���
"���)�345$"4>"G�$"4>"G�$"4>"G445455"*�$C4��5��"���
"���-1345$"4>"G"6("4��$"4�>"G�"���"���45�")�$C44	5?��"���
"����gf
		�gv		�glen		V�gi		\�gf
�Bgv1�Bgv2	�Bglen	Bgi	;gf
K�gvsK�gvs	t�glen	��gv1	��gi	��gfilenamefsrfi/srfi-43.scm�
�	��	
�	��	�	��	�	��	1�	��	>�	��	@�	��	P�	��	V�	��	\�	��	a�	��	e�		��	l�	��	u�	!��	w�	��	x�	��	{�	����	����	����	����	����	����	����	����	����	����	����	����	����	����	���	(���	���	���	���	���		��!�	��*�	"��/�	4��1�	��2�	��5�	��;�	��;�	��K�	��L�	��_�	��a�	��t�	����	����	����	����	����	����	����	����		����	����	(����	����	����	����	����	��B		�	�B	K�
gnamegvector-map!�g
documentationf�(vector-map! f vec2 vec2 ...) -> unspecified

Similar to vector-map, but rather than mapping the new elements into a
new vector, the new mapped elements are destructively inserted into
VEC1.  The dynamic order of application of F is unspecified.�CR�G��5h�)�345$"4>"G�$"4>"G45"+�$C4�>"G�"���
"���)�345$"4>"G�$"4>"G�$"4>"G445455"0�$C4��>"G�"���
"���-1345$"4>"G"6("4��$"4�>"G�"���"���45"1�$C4	4
5>"G�"���
"����gf
		�gv		�glen		V�gi		\�gf
�Ngv1�Ngv2	�Nglen	Ngi	Ggf
WgvsWgvs	��glen	�gi	��gfilenamefsrfi/srfi-43.scm�
	��	
	��		��		��	1		��	>		��	@		��	P
	��	V
	��	\	��	a	��	e		��	h
	��	q
	��	v
	���	���	���	���	���	���	���	���	���	���	���	���	���	���	��	��		��	��	��	��	�� 		��#	��,	��1	"��6	��A	��G	��G	��W	��X	��k	��m	���	���	���	���	���	���	���	���		���	���	���	��� 	��� 	���	��>		�	�N	W
gnamegvector-for-each�g
documentationf�(vector-for-each f vec1 vec2 ...) -> unspecified

Call (F i VEC1[i] VEC2[i] ...) for each index i less than the length
of the shortest vector passed.  The iteration is strictly
left-to-right.�CR�G ��5
h0V)�345$"4>"G�$"4>"G45"7�$C4�5$��"����"���

"���)�345$"4>"G�$"4>"G�$"4>"G445455"<�$C4��5$��"����"���

"���-1345$"4>"G"6("4��$"4�>"G�"���"���45";�$C44	5?$��"����"���

"���Ngpred?
		�gv		�glen		V�gi		\�gcount		\�gpred?
�lgv1�lgv2	�lglen	 lgi	&bgcount	&bgpred?
u.gvsu.gvs	��glen	�.gi	�$gcount	�$gfilenamefsrfi/srfi-43.scm�
#	��	
*	��	*	��	*	��	1+	��	>+	��	@+	��	P,	��	V,	��	\-	��	a.	��	e.		��	i/	��	r/	��	t/	��	x.		��	{0	��	~0	���0	���2	���2	���-	���#	���4	���4	���4	���5	���5	���5	���6	���6	���6	��7	��7	��8	�� 7	�� 7	��&9	��+:	��/:		��3;	��<;	��A;	+��C;	��G:		��J<	��M<	��U<	��X>	��b>	��b9	��u#	��v@	���@	���@	���A	���A	���A	���B	���B	���C	���D	���D		���E	���E	��E	��	D		��F	��F	��F	��H	��$H	��$C	��J		�	�l	u.
gnamegvector-count�g
documentationf�(vector-count pred? vec1 vec2 ...) -> exact nonnegative integer

Count the number of indices i for which (PRED? VEC1[i] VEC2[i] ...)
returns true, where i is less than the length of the shortest vector
passed.�C R�G!��5
h��)�345$"4>"G�$"4>"G45"%�$4�5$C�"���C
"���)�345$"4>"G�$"4>"G�$"4>"G445455"*�$4��5$C�"���C
"���-1345$"4>"G"6("4��$"4�>"G�"���"���45")�$44	5?$C�"���C
"����gpred?
		�gv		�glen		V�gi		\�gpred?
�Bgv1�Bgv2	�Bglen	Bgi	;gpred?
K�gvsK�gvs	t�glen	��gi	��gfilenamefsrfi/srfi-43.scm�
K	��	
R	��	R	��	R	��	1S	��	>S	��	@S	��	PT	��	VT	��	\U	��	aV	��	eV		��	fW	��	mW	��	oW	��	sW	��	yY	��	Y	���U	���K	���[	���[	���[	���\	���\	���\	���]	���]	���]	���^	���^	��_	��^	��^	��`	��a	��a		��b	��"b	��'c	��)b	��-b	��3e	��9e	��;`	��KK	��Lg	��_g	��ag	��th	���h	���h	���i	���i	���j	���k	���k		���l	���l	���l	���l	���n	���n	���j	��A		�	�B	K�
gnamegvector-index�g
documentationf�(vector-index pred? vec1 vec2 ...) -> exact nonnegative integer or #f

Find and return the index of the first elements in VEC1 VEC2 ... that
satisfy PRED?.  If no matching element is found by the end of the
shortest vector, return #f.�C!R�G"��5
h�@)�345$"4>"G�$"4>"G45"$
�$4�5$C�"���C�"���)�345$"4>"G�$"4>"G�$"4>"G445455")
�$4��5$C�"���C�"���-1345$"4>"G"6("4��$"4�>"G�"���"���45"(
�$44	5?$C�"���C�"���8gpred?
		�gv		�glen		V�gi		\�gpred?
�Dgv1�Dgv2	�Dglen	Dgi	;gpred?
M�gvsM�gvs	v�glen	��gi	��gfilenamefsrfi/srfi-43.scm�
q	��	
x	��	x	��	x	��	1y	��	>y	��	@y	��	Pz	��	Vz	��	\{	��	`|	��	d|		��	e}	��	l}	��	n}	��	r}	��	x	��	~	���{	���{	���{	���q	����	����	����	����	����	����	����	����	����	����	����	���	���	���	���	���	���		���	��"�	��'�	��)�	��-�	��3�	��9�	��;�	��>�	��D�	��Mq	��N�	��a�	��c�	��v�	����	����	����	����	����	����	����		����	����	����	����	����	����	����	����	����	��G		�	�D	M�
gnamegvector-index-right�g
documentationf(vector-index-right pred? vec1 vec2 ...) -> exact nonnegative integer or #f

Find and return the index of the last elements in VEC1 VEC2 ... that
satisfy PRED?, searching from right-to-left.  If no matching element
is found before the end of the shortest vector, return #f.�C"R�G#��5
h��)�345$"4>"G�$"4>"G45"%�$4�5$	�"���CC
"���)�345$"4>"G�$"4>"G�$"4>"G445455"*�$4��5$	�"���CC
"���-1345$"4>"G"6("4��$"4�>"G�"���"���45")�$44	5?$	�"���CC
"����gpred?
		�gv		�glen		V�gi		\�gpred?
�Bgv1�Bgv2	�Bglen	Bgi	;gpred?
K�gvsK�gvs	t�glen	��gi	��gfilenamefsrfi/srfi-43.scm�
�	��	
�	��	�	��	�	��	1�	��	>�	��	@�	��	P�	��	V�	��	\�	��	a�	��	e�		��	f�	��	m�	��	o�	��	s�	��	v�	��	|�	����	����	����	����	����	����	����	����	����	����	����	����	����	���	���	���	���	���	���		���	��"�	��'�	��)�	��-�	��0�	��6�	��;�	��K�	��L�	��_�	��a�	��t�	����	����	����	����	����	����	����		����	����	����	����	����	����	����	��A		�	�B	K�
gnamegvector-skip�g
documentationf�(vector-skip pred? vec1 vec2 ...) -> exact nonnegative integer or #f

Find and return the index of the first elements in VEC1 VEC2 ... that
do not satisfy PRED?.  If no matching element is found by the end of
the shortest vector, return #f.�C#R�G$��5
h�E)�345$"4>"G�$"4>"G45"$
�$C4�5$	�"���C�"���)�345$"4>"G�$"4>"G�$"4>"G445455")
�$C4��5$	�"���C�"���-1345$"4>"G"6("4��$"4�>"G�"���"���45"(
�$C44	5?$	�"���C�"���=gpred?
		�gv		�glen		V�gi		\�gpred?
�Dgv1�Dgv2	�Dglen	Dgi	;gpred?
M�gvsM�gvs	v�glen	��gi	��gfilenamefsrfi/srfi-43.scm�
�	��	
�	��	�	��	�	��	1�	��	>�	��	@�	��	P�	��	V�	��	\�	��	_�	��	d�		��	g�	��	n�	��	p�	��	t�	��	w�	��	}�	����	����	����	����	����	����	����	����	����	����	����	����	����	����	����	���	���	���	���	���	���		���	��$�	��)�	��+�	��/�	��2�	��8�	��;�	��>�	��D�	��M�	��N�	��a�	��c�	��v�	����	����	����	����	����	����	����		����	����	����	����	����	����	����	����	����	��G		�	�D	M�
gnamegvector-skip-right�g
documentationf(vector-skip-right pred? vec1 vec2 ...) -> exact nonnegative integer or #f

Find and return the index of the last elements in VEC1 VEC2 ... that
do not satisfy PRED?, searching from right-to-left.  If no matching
element is found before the end of the shortest vector, return #f.�C$Rhp�]-"]�$R�	��45		
�$C	
�$"���	
�$
�"���CC"����gvec
		ogvalue		ogcmp			ogstart			ogend			oglo			cghi			cgi			agx			agc			)	a
gfilenamefsrfi/srfi-43.scm�
�	��	�	��	�	
��	�	��	�	!��	�	��	�	
��	�	��	�	
��	!�	��	)�	
��	.�	��	3�	��	9�	��	>�	��	J�	$��	M�	��	R�	��	U�	*��	_�	$��	c�	��		o	gnameg%vector-binary-search�CG%���5�p�
h��)[3�$"4>"G45$"4>"GL
456)�3�$"4>"G45"4>";G"445$%
�$�$""���""���""���L6]
�$"4>"G45"4	>"_G"X45$I45$6
�$&�$�$""���""���""���""���""���L6�gvec
			agvalue			agcmp				agvec
	j�gvalue	j�gcmp		j�gstart		j�glen	��gvec
��gvalue��gcmp	��gstart	��gend	��glen	�gfilenamefsrfi/srfi-43.scm�
�	��	�	��	�	��	�	��	+�	��	>�	��	@�	��	Y�	.��	a�	��	j�	��	m�	��	z�	��	|�	����	����	����		����	'����		���		����	���	��	��	��	��	��%		��)	+��+		���		��			a		j�	��	g
documentationf(vector-binary-search vec value cmp [start [end]]) -> exact nonnegative integer or #f

Find and return an index of VEC between START and END whose value is
VALUE using a binary search.  If no matching element is found, return
#f.  The default START is 0 and the default END is the length of VEC.
CMP must be a procedure of two arguments such that (CMP A B) returns
a negative integer if A < B, a positive integer if A > B, or zero if
A = B.  The elements of VEC must be sorted in non-decreasing order
according to CMP.�CO%R�G&��5
hP)�345$"4>"G�$"4>"G45")�$4�5$C�"���C
"���)�345$"4>"G�$"4>"G�$"4>"G445455".�$#4��5$C�"���C
"���-1345$"4>"G"6("4��$"4�>"G�"���"���45"-�$"44	5?$C�"���C
"���Hgpred?
		�gv		�glen		V�gi		\�gt		o�gpred?
�Jgv1�Jgv2	�Jglen	Jgi	Cgt	-Agpred?
S�gvsS�gvs	|�glen	��gi	��gt	��gfilenamefsrfi/srfi-43.scm�
		��	
	��		��		��	1	��	>	��	@	��	P	��	V	��	\	��	a	��	e		��	f	��	m	��	o	��	o	��	}	���	���	���		���	���	���	���	���	���	���	���	���	���	��	��	��	��	��	��	��		�� 	��& 	��+!	��- 	��- 	��;"	��A"	��C	��S		��T$	��g$	��i$	��|%	���%	���%	���&	���&	���'	���(	���(		���)	���)	���)	���)	���*	���*	���'	��A		�	�J	S�
gnameg
vector-any�g
documentationf2(vector-any pred? vec1 vec2 ...) -> value or #f

Find the first parallel set of elements from VEC1 VEC2 ... for which
PRED? returns a true value.  If such a parallel set of elements
exists, vector-any returns the value that PRED? returned for that set
of elements.  The iteration is strictly left-to-right.�C&R�G'��5
h@m)�345$"4>"G�$"4>"G45
�$C"04�5�$	�"$C"���
"���)�345$"4>"G�$"4>"G�$"4>"G445455
�$C"54��5�$	�"$C"���
"���-1345$"4>"G"6("4��$"4�>"G�"���"���45
�$C"444	5?�$	�"$C"���
"���egpred?
		�gv		�glen		V�gt		\�gi		k�gval		x�gnext-i		x�gpred?
�vgv1�vgv2	�vglen	%vgt	+vgi	:ogval	Lognext-i	Logpred?
=gvs=gvs	��glen	�=gt	�=gi	6gval	6gnext-i	6gfilenamefsrfi/srfi-43.scm�
-	��	
6	��	6	��	6	��	17	��	>7	��	@7	��	P8	��	V8	��	[9	��	\9	��	k:	��	l;	��	s;	��	u;	��	x<	��	x;	
���=	���=	!���=	���=	���?	���:	���-	���A	���A	���A	���B	���B	���B	���C	��C	��C	��D	��D	��E	��%D	��%D	��*F	��+F	��:G	��;H	��BH	��GI	��IH	��LJ	��LH	
��VK	��[K	!��`K	��dK	��oM	��oG	��-	���O	���O	���O	���P	���P	���P	���Q	���Q	���R	���R	��S	��T	��T	%��T	��U	��T	
��V	��"V	!��'V	��+V	��6X	��6S	��M		�	�v	=
gnamegvector-every�g
documentationf\(vector-every pred? vec1 vec2 ...) -> value or #f

If, for every index i less than the length of the shortest vector
argument, the set of elements VEC1[i] VEC2[i] ... satisfies PRED?,
vector-every returns the value that PRED? returned for the last set of
elements, at the last index of the shortest vector.  The iteration is
strictly left-to-right.�C'RG(�5�ph��]�$"4>"G45"4>";G"445$%
�$�$""���""���""���"4>";G"445$%
�$�$""���""���""�������C�gvec
	�gi	�gj		�glen		*�gtmp	��gfilenamefsrfi/srfi-43.scm�
Z
��	^	��	^	��	^	��	$_	
��	*_	��	1`	��	5`	��	7`	���a	���a	���a	���b	���b	���c	���c	���d	��	�	gnamegvector-swap!�g
documentationfZ(vector-swap! vec i j) -> unspecified

Swap the values of the locations in VEC at I and J.�C(RHh0�]"�$��"���C"����gvec
		)gfill		)gstart			)gend			)gi			!gfilenamefsrfi/srfi-43.scm�
k	��	l	��	m	��	m	��	n	
��	o	��	o	
��	!l	��			)	gnameg
%vector-fill!�CKG9�5�p�hX�)3M6)�3�$"4>"G45"4>";G"445$%
�$�$""���""���""���L6]�$"4>"G45"4>"_G"X45$I45$6
�$&�$�$""���""���""���""���""���L6�gvec
			gfill			gvec
	�gfill	�gstart		�glen		B�gvec
�Rgfill�Rgstart	�Rgend	�Rglen	�Rgfilenamefsrfi/srfi-43.scm�
p	��	v	��	p	��	x	��	*x	��	,x	��	<y	��	By	��	Iz		��	Mz	'��	Oz		���{		���p	���}	���}	���}	���~	���~	���		���	+���		��R�		��					�	�R	g
documentationf�(vector-fill! vec fill [start [end]]) -> unspecified

Assign the value of every location in VEC between START and END to
FILL.  START defaults to 0 and END defaults to the length of VEC.�CO9RhHC]"1�$&������"���C�"���;gvec
		Dgstart		Dgend			Dgi			7gj			7gtmp			5gfilenamefsrfi/srfi-43.scm�
�
��	�	��	�	
��	�	��	�	��	�	��	�	��	 �	��	'�	��	*�	��	-�	��	5�	��	7�	��	<�	��	D�	��		D	gnameg%vector-reverse!�C RG)� 5�p�	hx�)23�$"4>"G
456)�3�$"4>"G45"4>";G"445$%
�$�$""���""���""���6]�$"4>"G45"4>"_G"X45$I45$6
�$&�$�$""���""���""���""���""���6�gvec
			8gvec
	A�gstart	A�glen		i�gvec
�ugstart�ugend	�uglen	�ugfilenamefsrfi/srfi-43.scm�
�	��	�	��	�	��	�	��	0�	��	8�	��	A�	��	D�	��	Q�	��	S�	��	c�	��	i�	��	p�	��	t�	%��	v�	����	����	����	����	����	����	����	����	����	)����	��u�	��			8	A�	�u	gnamegvector-reverse!�g
documentationf�(vector-reverse! vec [start [end]]) -> unspecified

Destructively reverse the contents of VEC between START and END.
START defaults to 0 and END defaults to the length of VEC.�C)R4J!LO�568:AB<D@NO>FPVWZ]`_Kegjkinph8t]	

������	

�������	

�������Clgdummy
	1gcopy!	1g	docstring		1g
inner-proc		1	1	C{|h(�]	45$@6�gx
		"gtmp		"gfilenamefsrfi/srfi-43.scm�
�
��		"g
macro-typegsyntax-rules�gpatternsgcopy!g	docstringg
inner-procC5!RG*�5�pXq�h�)�3�$"4>"G�$"4>"G4545"4>";G"445$%
�$�$""���""���""�����$"4>"G
�$

6	
6)G3�$"4>"G�$"4>"G4545"4>";G"445$%
�$�$""���""���""���"4>";G"445$%
�$�$""���""���""������$"4>"G�$6	6]�$"4>"G�$"4>"G4545"4>";G"445$%
�$�$""���""���""���"4
>"_G"X45$I45$6
�$&�$�$""���""���""���""���""������$"4>"G�$6	6�gtarget
		�gtstart		�gsource			�gtlen		Y�gslen		Y�gtarget
�Bgtstart�Bgsource	�Bgsstart	�Bgtlen	NBgslen	NBgtarget
D�gtstartD�gsource	D�gsstart	D�gsend	D�gtlen	��gslen	��gfilenamefsrfi/srfi-43.scm�
�
����	����	����	����	����
��"�	��&�	��4�	��B�	��D�
����	����	����	����	��		�	�B	D�	g
documentationf�(vector-copy! target tstart source [sstart [send]]) -> unspecified

Copy a block of elements from SOURCE to TARGET, both of which must be
vectors, starting in TARGET at TSTART and starting in SOURCE at
SSTART, ending when SEND - SSTART elements have been copied.  It is an
error for TARGET to have a length less than TSTART + (SEND - SSTART).
SSTART defaults to 0 and SEND defaults to the length of SOURCE.�C*R h`_]"4"#�$����"���C�"���&�$
6"���"���Wgtarget
		]gtstart		]gsource			]gsstart			]gsend			]gi		
	-gj		
	-gfilenamefsrfi/srfi-43.scm�
�	��	
�	��	�	��	�	
��	�	"��	�	��	 �	��	#�	��	+�	��	-�	��	2�	!��	:�	��	:�	��	G�	!��	K�	��	U�	��		]	gnameg%copy!�CG+�5�pX�	hp>)�3�$"4>"G�$"4>"G4545"4>";G"445$%
�$�$""���""���""�����$"4>"GL
6)03�$"4>"G�$"4>"G4545"4>";G"445$%
�$�$""���""���""���"4>";G"445$%
�$�$""���""���""������$"4>"GL6]�$"4>"G�$"4>"G4545"4>";G"445$%
�$�$""���""���""���"4>"_G"X45$I45$6
�$&�$�$""���""���""���""���""������$"4>"GL66gtarget
		�gtstart		�gsource			�gtlen		Y�gslen		Y�gtarget
�gtstart�gsource	�gsstart	�gtlen	9gslen	9gtarget
kgtstartkgsource	kgsstart	kgsend	kgtlen	hkgslen	hkgfilenamefsrfi/srfi-43.scm�
�
��		�	�	k	g
documentationfX(vector-reverse-copy! target tstart source [sstart [send]]) -> unspecified

Like vector-copy!, but copy the elements in the reverse order.  It is
an error if TARGET and SOURCE are identical vectors and the TARGET and
SOURCE ranges overlap; however, if TSTART = SSTART,
vector-reverse-copy! behaves as (vector-reverse! TARGET TSTART SEND)
would.�CO+Rh8]"�$C���"����"���gvec
		1gstart		1gend			1gi			%gresult			%gfilenamefsrfi/srfi-43.scm�
�	��	�	��	�	��	�	��	�	��	�	 ��	�	��	%�	��	%�	��	(�	��	)�	��	1�	��
		1	gnameg
%vector->list�CG;�5�p�hx�)23�$"4>"GL
456)�3�$"4>"G45"4>";G"445$%
�$�$""���""���""���L6]�$"4>"G45"4>"_G"X45$I45$6
�$&�$�$""���""���""���""���""���L6�gvec
			8gvec
	A�gstart	A�glen		i�gvec
�ugstart�ugend	�uglen	�ugfilenamefsrfi/srfi-43.scm�
�	��	�	��	�	��	�	��	0�	��	8�	��	A�	��	D�	��	Q�	��	S�	��	c�	��	i�	��	p�		��	t�	'��	v�		����		����	����	����	����	����	����	����		����	+����		��u�		��			8	A�	�u	g
documentationf�(vector->list vec [start [end]]) -> proper-list

Return a newly allocated list containing the elements in VEC between
START and END.  START defaults to 0 and END defaults to the length of
VEC.�CO;Rh0]"�$C���"���"���gvec
		0gstart		0gend			0gi			%gresult			%gfilenamefsrfi/srfi-43.scm�
�	��	�	��		��		��		��		 ��		��	%	��	%�	��	(	��	0�	��		0	gnameg%reverse-vector->list�CG,�5�p�hx�)23�$"4>"GL
456)�3�$"4>"G45"4>";G"445$%
�$�$""���""���""���L6]�$"4>"G45"4>"_G"X45$I45$6
�$&�$�$""���""���""���""���""���L6�gvec
			8gvec
	A�gstart	A�glen		i�gvec
�ugstart�ugend	�uglen	�ugfilenamefsrfi/srfi-43.scm�
	��		��		��		��	0	$��	8	��	A	��	D	��	Q	��	S	��	c	��	i	��	p		��	t	'��	v		���		���	���	���	���	���	���	���		���	+���		��u		��			8	A�	�u	g
documentationf�(reverse-vector->list vec [start [end]]) -> proper-list

Return a newly allocated list containing the elements in VEC between
START and END in reverse order.  START defaults to 0 and END defaults
to the length of VEC.�CO,Rr0shpZ-.,3#
#	45�45""�$C����"���
45"���Rglst
		lgstart		lgend			lglen		)	lgresult		2	lgi		8	Zglst		8	Zgfilenamefsrfi/srfi-43.scm�

��		5��	)	��	)	��	, 	��	2	��	8!	��	="	
��	A"	��	K$	'��	L$	��	O%	��	R%	��	Z%	��	Z!	��	\!	��	l!	��		l	gnameglist->vector�g
documentationf�(list->vector proper-list [start [end]]) -> vector

Return a newly allocated vector of the elements from PROPER-LIST with
indices between START and END.  START defaults to 0 and END defaults
to the length of PROPER-LIST.�C:Rr0shp�-.,3#
#	45�45"!
�$C����"����45"���}glst
		mgstart		mgend			mglen		)	mgresult		2	mgi		8	Yglst		8	Ygfilenamefsrfi/srfi-43.scm�
(
��	(	=��	).	��	).	��	,/	��	2.	��	80	��	;1	
��	@1	��	J3	'��	K3	��	N4	��	Q4	��	Y4	��	Y0	��	\0	��	]0	"��	m0	��		m	gnamegreverse-list->vector�g
documentationf�(reverse-list->vector proper-list [start [end]]) -> vector

Return a newly allocated vector of the elements from PROPER-LIST with
indices between START and END, in reverse order.  START defaults to 0
and END defaults to the length of PROPER-LIST.�C-RCdgm
		4g%vector-reverse-copy
/73�gall-of-length?
@KGSg=up-to?@KGSg%vector-binary-search
�c��gguile-vector-fill!
���[g
%vector-fill!��Xg%copy!
�!�g
%vector->list
�\ҧg%reverse-vector->list
��h
gfilenamefsrfi/srfi-43.scm�		
��	5	)
��	:	)	��	B	)	&��	G	)
��D	+
��
�	U
���	]
���	d
��&��
��&��
��-k�
��3��
��6�
��:�
��<E-
��=�5
��GV<
��O�j
��X*�
��_��
��g�
��m�
��uq"
��|bJ
����p
�����
��� �
�����
���;
���,
����Z
���^g
�����
���M�
���I�
���!�
��Ҫ�
���k�
���M
���`(
��*	�b
C6
© 2025 GrazzMean