Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
Download

build open-axiom

54437 views
#!/projects/77750c71-ec7b-4962-bf55-a49ff5065fb6/open-axiom-build/src/interp/interpsys --script
# FASL
  compiled from "/tmp/oa-h5IcQ9/code.lsp"
  using SBCL version 1.2.14.debian
�X86-64N
1.2.14.debian2(:GENCGC :SB-PACKAGE-LOCKS :SB-THREAD :SB-UNICODE)�SB-C�	%PROCLAIMPFTYPEPFUNCTION�	AxiomCore�%Thing�%Shell		�BOOT�	ABELGRP-;-;3$;1	##�/tmp/oa-h5IcQ9/code.lsp	o	0	8�	ABELGRP-;subtractIfCan;2$M;2	##
0	8�%IntegerSection#			�	ABELGRP-;*;Nni2$;3	##
0	8�%Integer		�	ABELGRP-;*;I2$;4	##
0	8�%Boolean	�	ABELGRP-;opposite?;2$B;5	##
0	8�SB-IMPL�$%DEFUN
>&#"u#RTSTANDARDTMINIMAL##`#$"�#$"#$"�\	TEXTERNAL�TL-XEP
	q	0
	#v"�"|#&'##$"�#$"
#$"M\	
,0
	\	
s	0		��1�EH���0H�e�H��H��H�΍A���y���H��H�]�H�U�H�u�I�L$`H�M�H�E�H�H�H�U�H9���H�M�H�D�H�E�H�M؍A����H��H�P�H��H�l$H�l$��%X H�U�H�E�H�H�H�U�H9���H�M�H�\�H�]ȍC����H��H�P�H��H�l$H�l$��%X H��H�]�H�{H�\$�H��H�U�H�+H���P�HB�H��H�E�H�pH�U�H�Eй�u�`���
*��
���
/��
���
/��4
�	x�	y�	$	P
SIMPLE-VECTOR	P*	PCDR##	PFUNCALL###	=@PCAR@�	SB-KERNEL�B%COERCE-CALLABLE-TO-FUN@�BDATA-VECTOR-REF####	PLENGTHE�B%CHECK-BOUNDE�BDATA-VECTOR-REF-WITH-OFFSETE?>PSVREFEA>C>D###	FJGJHJIJ\$	�	
shellEntryE�	SPADCALL@LJM>\	\	�P##
0	8%>R#"�#L&'##`#$"#$"�#$"�\	)*	,0
	#y"�"�"�&'##,""
#,"�"�#,""�\		,0
	\	10		�1�EH����H�e�H�΍A����y����H��L��L�U�L��L�M�L��L�E�I�L$`H�M�I�H��H9�vcI�t�H�u��F��u\H��H�P�H��H�l$H�l$��%X H��L�E�H�u�L�U�L�M�H�vI��I��H�ù�u�`���
*��
���
/�Z8<?##	=[A[C[D###	F\G\H\I\\	L\M[\	\	�`##
0	8%>b#"1#^&'##`#,"�"�#,"�"
#,"�"M\
	)*	,0
	"�"�":"�&'##,""�#,"�"�#,""�\		,0
	\	10		�J1�EH����H�e�H��H�]�L��L�M�L��L�m��C�u
�uN�{�uH1�H�ӹ��L�m�L�M�H�]�|.A�E���A�}����I��L��L�U�L�M�L��L�E���
H��I�L$`H�M�I�H�� H9�veI�t�H�u�F��u^H��H�P�H��H�l$H�l$��%X H��L�E�H�u�L�U�L�M�H�vI��I��H�ù�u�`���
*���
���
/�TABSOLUTE�SB-VM�k	GENERIC-<�um�	n57	P
UNSIGNED-BYTE9	;	?##	=sAsCsD###	FtGtHtIt\	LtMs\	\	�x##
0	8%>z#"�#L&'##`#$"#$"�#$"�\	)*	,0
	"�"�"�"�&'##$"�#$"
#$"M\	,0
	\	10		��1�EH���OH�e�H�΍B�u
�u,�z�u&�A��.�y���$H��H�U�H�}�H�u���
A�I�L$`H�M�H�}���H�U�1�����H�E�H�H�H�U�2H9���H�M�H�D�H�E�H�M؍A����H��H�P�H��H�l$H�l$��%X H�U�H�U�A�A��H�U�H�E�H�H�H�U�H9��rH�M�H�\�H�]��C���cH��H�P�H��H�l$H�l$��%X H��H�]�H�{H�\$�H��H�U�H�+H���P�HB�H��H�E�H�pH�U�H�Eй�u�`�H�E�H�H�H�U�2H9���H�M�H�t�H�u؍F����H��H�P�H��H�l$H�l$��%X H��H�u�H�vH�U�H�}�H�ù�u�`�H�E�H�H�H�U�*H9���H�M�H�t�H�u؍F��uxH��H�P�H��H�l$H�l$��%X H��H�u�H�VH�ù�u�`���
*��
���
/��
���
/���
���
/��
���
/�j�kGENERIC-NEGATE�j�k	GENERIC->���oPINTEGER9	;	=####	?#####	=�A�C�D######	F�G�H�?�P-#####	I��B%NEGATE�A�C�D#####	F�G�H�I�?####	=�A�C�D#####	F�G�H�I�PPLUSP####	P>�?####	=�A�C�D�F�G�H�I�PZEROP####	P=�\T	L�M�L�M�L�M�M��	spadConstant�PCOND##	\	\	��##
0	8%!>�#"�#R&'#	#`#$"�#$"#$"�\	)*!	,0
	#v"�"�#&'#	#$"�#$"
#$"M\	!,0
	\	!10		��1�EH����H�e�H��H��H�΍A��j�y���`H��H�]�H�U�H�u�I�L$`H�M�H�E�H�H�H�U�8H9��3H�M�H�D�H�E�H�M؍A��� H��H�P�H��H�l$H�l$��%X H�U�H�E�H�H�H�U�H9���H�M�H�\�H�]ȍC����H��H�P�H��H�l$H�l$��%X H��H�]�H�{H�\$�H��H�U�H�+H���P�HB�H��H�E�H�pH�\$�H��H�U�H�EйH�+H���P�rH��R�� H��H��H)�H��H�S�H�{�H�s�H��H��u
H�V�H���]ø����
*��
���
/��
���
/��j�RETURN-MULTIPLE���!8:PVALUESP	&OPTIONALPMEMBER	P&REST		=#	#	?#	##	=�A�C�D#	###	F�G�H�?�I�A�C�D#	##	F�G�H�I�\$	L�M�L�M�\	\	��##	
0	8%�	
AbelianGroup&>��		devaluate<��	newShell<�	buildPredVector<�	stuffDomainSlots<�	Ring	�	HasCategory<<#"Y#I&'#
#`#$"\	)*�	,0
	#M"�"[#V&'#
#$"�\	�,0
	\	�10		��1�EH���H�e�H�U�I�L$`H�M�H�\$�H��H�U�H�V����H�+H���P	HB�H��H�5B���I�l$@M�\$I�S I;T$ ��I�T$I�SH��H�p�H��H�@�H�X�H�@ I1l$@t�	H�U�H�\$�H���<H������H�+H���P	HB�H��H�]�L�D$�H��1�1�� H������I�(I���P	HB�H�]��C��5�{���+H��H�K�1�H9�� H�M�H�L�H��H�K��H9��H�T�H�t$�H��H��H�V����H�.H���P	HB�H�]�H�K��H9���H�U�H�T�H�t$�H��H�U�H�=���H�����H�.H���P	HB�H�]�H�� u[H�K��6H9���H�����H�p@���~I�l$@M�\$I�KI;L$ wnI�L$I�KI1l$@t�	H�q�H�YH�L�H��H���]��j ���Z���;����
*���
����
����
����
�����
j���Y���j�alloc_tramp�j�alloc_tramp^���	#1		�9�		�BDATA-VECTOR-SET#
#####	#
#######	PCONS#
######	F�G��BDATA-VECTOR-SET-WITH-OFFSET��B%SVSET��#
#####	�#
###	F�G����#
###	�#
###	F�G����#
###	F�G����������#
####	�#
####	PLIST#
####	�#
####	\8	PSETF��������#
###	\
	\	��##

0	8�	MAKEPROP��	infovec��	local�	#�	#P+	
#�	�	Maybe#	#�	just	�7	�	Integer	#;	�	NonNegativeInteger	�	Boolean	#�	zero?	#!�	Zero	#%�		positive?	�	RepeatedDoubling#	�	PositiveInteger	#*�double	#0�	#5;	#;�	!\	�	
subtractIfCan#A�		opposite?#G�#M;#S\	��	makeByteWordVec2#7�\	�\	##################
###################################################
###############	############!_	7777�	lookupComplete78PGET��	DATABASE7���
����������	
!\	?PFDEFINITION��	DATABASE-TEMPLATE	78�7?��	DATABASE-LOOKUP-FUNCTION	78�7��	S	?��	DATABASE-CONSTRUCTORFORM	7# 8�7�	package?��	DATABASE-CONSTRUCTORKIND	7(&8�7��	�	CATEGORY'�		SIGNATURE����		.���		.;���		.��	��		.
���		.;���		.;��		!		�	AbelianGroup		�		?��	DATABASE-CONSTRUCTORMODEMAP	7D+8�7	?��	DATABASE-COSIG	7IG8�7�catdef.spad	?��	DATABASE-SOURCEFILE	7NL8�7�77	#PELT		
�77	#S		�77	S	777	#	S		;77	S	7�7	#S	7�7	#S			?��	DATABASE-OPERATIONALIST	7fQ8�7#A
#G�#M;#S\	?��	DATABASE-OPTABLE	7ki8�7!V	b	`	R	
[		?��	DATABASE-CAPSULE-DEFINITIONS	7un8�7�	ABELGRP-?��	DATABASE-ABBREVIATION	7zx8"aZ�+�V�'��U�	�U��
E��^���	#"aZ�t	0		����̧�́��i��Y��3?>�@