shell bypass 403

GrazzMean Shell

: /usr/kerberos/lib/guile/2.0/ccache/ice-9/ [ drwxr-xr-x ]
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: 3.148.107.37
User: edustar (269686) | Group: tty (888)
Safe Mode: OFF
Disable Function:
NONE

name : common-list.go
GOOF----LE-8-2.0,1]24h5]gguile�	�	gdefine-module*�	�	�	gice-9�	gcommon-list�	�		gfilenameS�	
fice-9/common-list.scm�	gexportsS�	gadjoin�	
gunion�	gintersection�	gset-difference�	greduce-init�	greduce�	gsome�	gevery�	gnotany�	gnotevery�	gcount-if�	gfind-if�	g	member-if�	g	remove-if�	g
remove-if-not�	g
delete-if!�	gdelete-if-not!�	gbutlast�	gand?�	gor?�	 ghas-duplicates?�	!gpick�	"g
pick-mappings�	#guniq�	$
 !"#�	%gset-current-module�	&%�	'%�	(gmemq�	)greverse!�	*gmemv�	+gmap�	,gcar�	-gcdr�	.glength�	/gerror�	0fnegative argument to butlast�	1gmember�C5hp,*]4	
$54'>"G(h�]45$C�C�ge
		gl		gfilenamefice-9/common-list.scm�
	M
��		O	��		O	��		O	��			gnamegadjoin�g
documentationfGReturn list L, possibly with element E added if it is not already in L.�CR
h(7](C(C�4�56/gl1
		%gl2		%gfilenamefice-9/common-list.scm�
	Q
��		U	��		W	��		W	��		W	&��	#	W	��	%	W	��		%	gnamegunion�g
documentationfwReturn a new list that is the union of L1 and L2.
Elements that occur in both lists occur only once in
the result list.�C
R)*hX�](C"8(64�5$���"����"���"����gl1
		Rgl2		Rgl1			Ggresult			Ggfilenamefice-9/common-list.scm�
	Y
��		\	��		]	��		^	��		^	��		_	��	!	_	��	%	_	��	)	^	��	,	_	(��	/	_	7��	2	_	1��	:	_	"��	=	`	��	G	`	��	G	]	��	J	]	!��	R	]	��		R	gnamegintersection�g
documentationfyReturn a new list that is the intersection of L1 and L2.
Only elements that occur in both lists occur in the result list.�CR)*hPr]"8(64�5$
�"������"���"���jgl1
		Igl2		Igl1			>gresult			>gfilenamefice-9/common-list.scm�
	b
��		d	��		e	��		e	��		f	��		f	��		f	��	 	e	��	#	f	$��	-	f	��	0	g	��	3	g	%��	6	g	��	>	g	��	>	d	��	A	d	��	I	d	��		I	gnamegset-difference�g
documentationf5Return elements from list L1 that are not in list L2.�CRh ](C4�5�6gp
		ginit		gl			gfilenamefice-9/common-list.scm�
	i
��		k	��		m	��		m	��		m	��		m	&��		m	��			gnamegreduce-init�g
documentationfESame as `reduce' except it implicitly inserts INIT at the start of L.�CRh(](C�(�C��6�gp
		"gl		"gfilenamefice-9/common-list.scm�
	o
��		u	��		v	��		u	��		v	��		w	��	 	w	%��	"	w	��			"	gnamegreduce�g
documentationf9Combine all the elements of sequence L using a binary operation P.
The combination is left-associative.  For example, using +, one can
add up all the elements.  `reduce' allows you to apply a function which
accepts only two arguments to more than 2 objects.  Functional
programmers usually refer to this as foldl.�CR+,-h�$-13(0"$(C4�5$C�"���"���"8(C4�45?$C�45"���"���gpred
		�gl		�grest			�gl			7gt		#	7gl		C	{grest		C	{gt		\	{gfilenamefice-9/common-list.scm�
	y
��	�	��	�		��	�	��	�	��	!�	��	#�	��	#�	��	1�	)��	7�	#��	7�		��	C�	��	I�	��	L�	��	Q�	%��	R�	-��	\�	��	\�	��	j�	��	k�	'��	{�	��	{�	��		�	
	gnamegsome�g
documentationfpPRED is a boolean function of as many arguments as there are list
arguments to `some', i.e., L plus any optional arguments.  PRED is
applied to successive elements of the list arguments in order.  As soon
as one of these applications returns a true value, return that value.
If no application returns a true value, return #f.
All the lists should have the same length.�CR+,-h�C-13(+"(C4�5$	�"���C"���"3(C4�45?$�45"���C"���;gpred
			}gl			}grest				}gl			2gl		>	qgrest		>	qgfilenamefice-9/common-list.scm�
�
��	�	��	�		��	�	��	�	��	�	��	!�	��	#�	��	'�	��	*�	)��	0�	#��	2�		��	>�	��	D�	��	E�	��	G�	��	L�	%��	M�	-��	W�	��	[�	��	^�	��	_�	'��	o�	��	q�	��			}	
	gnamegevery�g
documentationf�Return #t iff every application of PRED to L, etc., returns #t.
Analogous to `some' except it returns #t if every application of
PRED is #t and #f otherwise.�CRhU-134?�CMgpred
			gls			gfilenamefice-9/common-list.scm�
�
��	
�	��	�	��			
gnamegnotany�g
documentationf�Return #t iff every application of PRED to L, etc., returns #f.
Analogous to some but returns #t if no application of PRED returns a
true value or #f as soon as any one does.�CRhS-134?�CKgpred
			gls			gfilenamefice-9/common-list.scm�
�
��	
�	��	�	��			
gnamegnotevery�g
documentationf�Return #t iff there is an application of PRED to L, etc., that returns #f.
Analogous to some but returns #t as soon as an application of PRED returns #f,
or #f otherwise.�CRhHh]"0(C4�5$��"����"���
"���`gpred
		Agl		Agn			6gl			6gfilenamefice-9/common-list.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	��	�	 ��	!�	(��	)�	��	.�	��	6�	��	6�	��		A	gnamegcount-if�g
documentationfIReturn the number of elements in L for which (PRED element) returns true.�CRh(X](C4�5$�C�6Pgpred
		#gl		#gfilenamefice-9/common-list.scm�
�
��	�	��	�		��	�	��	�		��	�	��	�	��	!�	��	#�	��
		#	gnamegfind-if�g
documentationf|Search for the first element in L for which (PRED element) returns true.
If found, return that element, otherwise return #f.�CRh(](C4�5$C�6gpred
		"gl		"gfilenamefice-9/common-list.scm�
�
��	�	��	�		��	�	��	�		��	�	��	 �	��	"�	��			"	gnameg	member-if�g
documentationf9Return the first sublist of L for whose car PRED is true.�CR)hH�]"6(64�5$
�"������"���"����gpred
		Ggl		Ggl			<gresult			<gfilenamefice-9/common-list.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	��	�	��	!�	 ��	+�	��	.�	��	1�	$��	4�	��	<�	��	<�	��	?�	��	G�	��		G	gnameg	remove-if�g
documentationfWRemove all elements from L where (PRED element) is true.
Return everything that's left.�CR)hH�]"6(64�5$���"����"���"����gpred
		Ggl		Ggl			<gresult			<gfilenamefice-9/common-list.scm�
�
��	�	��	�	��	�	��	�	��	�	��	�	��	�	��	!�	��	$�	$��	'�	��	/�	��	2�	&��	<�	 ��	<�	��	?�	��	G�	��		G	gnameg
remove-if-not�g
documentationfURemove all elements from L where (PRED element) is #f.
Return everything that's left.�CRh0�](C4L�5$	�"���4L�5�C�gl
		-gfilenamefice-9/common-list.scm�
�	��	�	��		�	��	�	��	�	��	�	��	�	��	�	%��	�	��	"�	��	'�	"��	)�	��	*�	��		-gnameg	delete-if�Ch�]
OQ6�gpred
		gl		g	delete-if			gfilenamefice-9/common-list.scm�
�
��	�	��			gnameg
delete-if!�g
documentationf#Destructive version of `remove-if'.�CRh0�](C4L�5$4L�5�C�"����gl
		-gfilenamefice-9/common-list.scm�
�	��	�	��		�	��	�	��	�	��	�	��	�	��	�	��	�	&��	 �	��	!�	��	'�	/��	-�	 ��		-gnameg
delete-if-not�Ch�]
OQ6�gpred
		gl		g
delete-if-not			gfilenamefice-9/common-list.scm�
�
��	�	��			gnamegdelete-if-not!�g
documentationf'Destructive version of `remove-if-not'.�CRh(�](C
�$�4L��5�CC�glst
		%gn		%gfilenamefice-9/common-list.scm�
�	��	�	��	�	��	�	��	�	��	�	(��	�	,��	�	6��	!�	(��	"�	��	$�	��		%	gnamegbl�C./0hH<]HOQ45�K
�$
45"J64glst
		Bgn		Bgl			Bgbl		
	Bgl			%gfilenamefice-9/common-list.scm�
�
��	�	��	�	��	�	��	,�	��	1�	��	2�	��	6�	��	:�	��	B�	��		B	gnamegbutlast�g
documentationf*Return all but the last N elements of LST.�CRh(�-13(C�$�@C�gargs
			!gfilenamefice-9/common-list.scm�
�
��	�	��	�		��	�	��	�	 ��	�	��			!


gnamegand?�g
documentationf#Return #t iff all of ARGS are true.�CRh(�-13(C�$C�@�gargs
			!gfilenamefice-9/common-list.scm�
�
��	�	��	�		��	�	��	�	��	!�	��			!


gnamegor?�g
documentationf"Return #t iff any of ARGS is true.�CR1 h(](C4��5$C�6�glst
		"gfilenamefice-9/common-list.scm�
�
��	�	��	�		��	�	��	�	��	�		��	�	��	 �	��	"�	��
		"gnameghas-duplicates?�g
documentationf3Return #t iff 2 members of LST are equal?, else #f.�C RhH�]"3(C4�5$���"����"���"����gp
		Dgl		Dgs			9gl			9gfilenamefice-9/common-list.scm�
�
��	�	��	�	��	�	��	�		��	�	��	�	��	�	$��	!�	��	$�	/��	,�	��	1�	 ��	9�	��	9�	��	:�	��	D�	��		D	gnamegpick�g
documentationfZApply P to each element of L, returning a list of elts
for which P returns a non-#f value.�C!RhH�]"6(C4�5$��"����"���"����gp
		Ggl		Ggs			<gl			<gt			<gfilenamefice-9/common-list.scm�

��		��		��		��			��		��		��	$	0��	'	A��	/	*��	4	 ��	<	��	<	��	=	��	G	��		G	gnameg
pick-mappings�g
documentationfPApply P to each element of L, returning a list of the
non-#f return values of P.�C"R)(hH\]"1(64�5$"���"���"���Tgl
		Bgacc		7gl			7gfilenamefice-9/common-list.scm�


��		��		��		��		��		��		��	 	��	)	��	,	��	/	��	7	��	7	��	8	��	B	��		Bgnameguniq�g
documentationf@Return a list containing elements of L, with duplicates removed.�C#RC"gm
		(gfilenamefice-9/common-list.scm�		4
��A	M
���	Q
���	Y
���	b
��	i
��
K	o
��	y
����
��p�
����
����
��C�
����
����
����
����
�� ��
��#w�
��$��
��%��
��&��
��(��
��*�
��,g

��	,i
C6
© 2025 GrazzMean