#!/bin/sh
# SWI-Prolog version: 2.1.14
# SWI-Prolog save-version: 25
exec ${SWIPL-c:/jan/pl/bin/pl.exe} -x $0 "$@"
# End Header
SWI-Prolog (c) 1990 Jan Wielemaker
 @ > >    '$welcome' prolog .plrc c:/jan/pl/ QFc:/jan/pl/boot/init.pl 0 sDt: user t$set_source_module v system Pop C@$C@%
	$op 	
 C@( 	X Pdynamic C@+, 
  C@.@"
/ $strip_module 
	functor  

 $set_predicate_attribute X Pmultifile C@3 

  C@6@"
  
	  

  X Pmodule_transparent C@; 

  C@>@"
  
	  

transparent  X Pdiscontiguous C@C 

  C@F@"
  
	  

  X Pvolatile C@K 

  C@N@"
  
	  

  X D@S t  t t 
t  t 
t  t 
t  t 
t  t 
t  t 
t $hide t $show_childs P @ C@d trace   X P @!C@l hide_childs   X D@t t  t t 
t ; t 
t | t 
t  t 
t call t 
t  @(t 
t  @(t 
t  @(t 
t  @(t 
t  @(t 
t ^ t 
t not t 
t \+ t 
t -> t 
t once t 
t ignore t 
t block t apply P @,C@X P @&C@ @1	C@ @1C@C@X P @'C@ @1	C@ @1C@C@X P 
C@X P @(C@X P @(C@X P @(C@X P @(C@		X P @(C@		
X P @(C@
		
	X P @*C@
@0
@,
@1X P @+C@
@0
@,
@1X P @-C@X P @.C@C@ X P @0C@X P @)C@X P @/C@X P! C@@4X Pexit C@@5X Pfail C@@4@9X D@ t  t 
t @" @&t 
t @" @'t 
t @" t 
t @" @,t 
t @$ @)t 
t @$ @(t 
t @$ @(t 
t @$ @(t 
t @$ @(t 
t @$ @(t 
t @$ @(t 
t @$ @*t 
t @$ @+t 
t @$ @-t 
t @$ @.t 
t @$ t 
t @$ @&t 
t @$ @'t 
t @$ @/t @$ @,P$prefix_module C@	
	
C@  
	
X D@ t  t t 
t prolog_trace_interception t exception D@ t  t t 
t  @It  @JD@ t  t 
t  t @"$prolog_trace_interception t  t @" @IP$map_trace_action C@ continue  C@ retry CA   @FX P @KCA   @I	
 @L@7$trace_continuation  X DAt  tflag $verbose_autoload v off DAt  t @U$enable_autoload v on DAt  t @U$autoloading v  P$undefined_procedure CA@)  
 @G   @Jundefined_predicate 
	
 @L@7 @RCA
@ @Y @Z @Z @U
$find_library   @[+  @U@-@8==  	@,ensure_loaded 
 @=@*@7@- $c_current_predicate @, 	import  @* 	use_module 
.  
[]  @= @[	 @U 	 @i @O @L@7 @RCA)			@=  @G
dwim_predicate 
findall 	 @q\==   	 @G		$warn_undefined @6 @#   @F @L@7 @RX P$ttyformat CA< @q @}X P @~CA>user_error format X P$confirm CAE	@O @~?   @| between @-@4@.@7get_single_char   @o@y @o@Y @o@j @o@J @o@n @o@N @o@  @o
 @qmemberchk @,$confirm_ @*Please answer 'y' or 'n'~n  @|@9@.X P @CAP@0 @o@y @o@Y @o@j @o@J @o@  @o
 @q @@-

@6$tty   @,
yes~n  @|@*@:CAV	@6 @no~n  @|@9X P$warning CA^ @q @X P @CA`@D@.@.@8source_location  
sformat @-   @^warning  @
@,@:@* @[WARNING: (~w:~d)~n~t~8|~w]~n  @o @o @o
 @q @CAh @[WARNING:   @q @ @ @ @]~n  @q @@6 @zX DAs t  t t 
t  @yt 
t $write_alternatives t $predicate_name P @xCAx@' @[WARNING: Undefined predicate: `~w'  @o @q @~@) @q @e@*~nHowever there are definitions for:  @| @ @ @|X P @CACA
 @~n~t~8|~w  @o @q @~ @X P @CA@M 	
 @-@$ @o  @o  @q @@,~w/~w  @o
 @o @q @@*~w:~w/~w  @o @o
 @o @q @X DA t  t t  t file_search_path DA t  t t  t  @O  @CAlibrary library_directory CA	swi home feature CAforeign  @arch  @lib/ 	concat CA  @ @lib X Pexpand_file_search_path CA@*    @	
 @arg 	
	$make_path CA
	@7atomic  	X P @CA  @ @CA @o	 @o  @o
 @q$concat_atom X P$check_file CA @9CA  CA@!$compiling database  @ @U @o.qlf  @o.pl  @o  @qexists $chk_file CA @o @ @o @ @q @ @X P @CA
$canonise_extensions 	
	$dochk_file X P @CA
    @
	$chk_alias_file CA	@-@0@7 @	@,@1
term_to_atom @.@8atom_chars  
	@ delete @.@8 @		 @CA@7is_absolute_file_name  	
$extend_file 	
$file_condition @8$absolute_file_name  
CA@2
 @@.@8file_directory_name  
 @o @o  @o	 @q @	 @	 @@8 @CA
 @	
 @@8 @
X DA t  t t $search_path_file_cache DA t  t t  @P @CA	
 @@8 @ 
CA@:
 @	
 @	 @@8 @	
	 @@0		 @@,@1 @	assert X P @CACA @	 @CA @@7exists_file  
CAfile_type directory @7exists_directory  
CA @file @7 @
@0@7 @
@,@1CAaccess  @ @ @ @CB @CB @@8access_file  
X P @CB$ensure_extensions 	
$list_to_set 	
member X P @CB
 CB
		$ensure_extension 	
	 @X P ACB	 @@8=  
CB@-
 @@,@8 A
@* @X P @CB CB@8 @	 @CB

		
 @X P @CB$CB%
	
$canonise_extension 		 @CB( AX P ACB+ @ @CB,
	 @p @CB. @p @X DB6 t  t t 
t  @t 
t $start_compilation t $end_compilation DB: t  t t 
t  @t 
t  A
t  ADB@t  t 
t @U$break_level v  t 
t @U @v @t 
t @U$preprocessor vnone tprompt v|:  Pcompiling  CBH @0	 @ @ @ @U@,	@1X DBK t  t t $ifcompiling P ACBN @ @ @ @UCBPX Ppreprocessor CBW A
 @UX P$open_source CBZ@" A A A@.@7seeing  @7see  	$open_source_call @6seen   @7 A	yes  @eCB`@F A@-@*%f $substitute_atom @,@.
@7 A
pipe  A A @6 A"@7 A
	 A% @e@*Illegal preprocessor specification: `~w'  @o @q @@9@.@.
@.X P A CBl@E$compilation_level  @b @U   A
	 @=@-
@,
 A% A@*no  A   A	 @= A,	 @UX P A'CBw
@:@.
@8name  	
@.@8 A0
@.@8 A0	append 	
	 A3		 A3		 A3@8 A0X DB t  t t 
t  @ht 
t  @pt 
t consult t 
t  @nt 
t  @nt 
t $use_module t 
t $ensure_loaded t $consult_file P @gCBCB
 @g @gCB@ 
 @-
 @@, A7@*ensure_loaded/1: No such file: ~w  @@9@.X P A9CB@1source_file  @-
$current_module @,
	all $import_list @*@-
  @e@,@:@* A5@.CB @overbose  @q A8X P @nCBCB
 AE AECB A? @mX P @mCB
 @o AC @q A6X P AFCB@! 	
 @	
 A=@.@7context_module  		 A@CB @o A @l
 @ois_module  ADX P @oCB @o	
 ABX P @q CB   X P ABCBCB
 AB ABCB @o AC @q ADX P$compiler_extension CB  @$qload_file CB  @ A8X P$consult_goal CB
 AL @X P ADCB@heapused statistics cputime  AR@- A @l
 @@,@:@*
 A? A@- AJ @@,true  A@*false  A @-@0	 @	 AO	 @o @o @o
 @o @o @o @q@,@:@*No such file: ~w  @@9@.@.@.@.@-@d AC @@)
 @[   @U@* @W @Z @Z @U@, AQ AR AT AR	@ @(		@ @(		$confirm_file 	$confirm_module ~N~w ~w~w, ~2f sec, ~D bytes.~n  @o @o @o @o @o @q @~@*
@:@.@.@.@.@.@.X P AXCC	 @

CC 
	X P AZCC  @CC@7atom  	 into   @CC  @X P$read_clause CCrepeat  @7read_clause  	X P A8CC@8  

		
	$consult_file_2 CC@#@.@8 Aj
$qlf_start_sub_module 
 A		
	 Ak$qlf_end_part  A	 X P AkCC&	
@U@.@8 Aj
@7$start_consult  		
$compile_type @- @wic  Au @U@,$assert_load_context_module 	$add_directive_wic @*@:	 Av@.@8$style_check   
 Ab$load_file 	 A	 A{	 X P AsCC7@0 @
 @U@- @ @e@,compiled  A@*@-qlf  @e@,*qcompiled*  A@*boot compiled  AX P$load_context_module CCC A 	
recorded X P AvCCF A 	
 ACCH A 	
recordz X P A}CCP?- module  A?
		 A?$load_module CCR:-  A A?
		 A? ACCT A A
		 ACCV A A
		 ACCX AUuse_module: ~w is not a module file  @o
 @q @@9CC[	end_of_file @8 Aj

CC]	@- AV@8 Aj

$qlf_start_file 
 A$consult_clause 	
 @= Ad@.@7 Af	 A Ao AX P$reserved_module CCg  CCh  X P ACCj ACannot load into module "~w": reserved module name  @o	 @q @@9CCo@7@.
@8 Aj

@8$declare_module  	$export_list $qlf_start_module 	 A Ad@.@7 Af		 A 	$check_export  Ao A	
 A@X P A@CC~CC@2 
		
 @8$import_wic  
 	 @k 
 @=	 A@CC A?@.@8export_list  
	$import_all X P ACC CC@"
 
 @k  @=@8 A	
 AX P ACCCC@$ 
	  	export 	
 ACCIllegal predicate specification in public list: `~w'  @o @q @	 AX P ACCexpand_term @-
$store_clause @, A @e@*@9X P$execute_directive CC
@: A
$add_directive_wic2 @-@( @( @e@, @ @ @U@-

$execute_directive2 @,
 @ @U@* @ @U@9@* A@.CC AX P ACC@.
@8 Aj

 
	CC@0@.
@8 Aj

@-  @e@,Directive failed: ~w  @o	 @q @@*Directive failed: ~w:~w  @o
 @o	 @q @@9X P ACC@%$common_goal_type @-load  @e@,@:@.@*@.@8 Aj 	 AxCC@-
 @ A A @U@,@:@*Cannot compile mixed loading/calling directives: ~w  @o	 @q @X P ACC 
 A	 ACC @2 A	 ACC @1 A	 ACC$goal_type X P ACC@-$load_goal @, A A@* @( AX P ACC CC  ABCC
 @g @ Au Au @UCC
 AE @ Au Au @UCC
 @m @ Au Au @UX DC t  t t term_expansion DC t  t t  AP ACC   A	
CC$translate_rule CC 
	X P ACCCC A	 ACC ACC A ACC A ACC
 
Full stop in clause body? (attempt to define ,/2)  @CC A@7nonvar   A AClause not closed by `.'? (attempt to call :-/2)  @CD $record_clause $qlf_assert_clause  AX DD t  t t $foreign_registered P ACD		@b--> @7proper_list  @-	 @q A@,
	
$t_head @.@.@*@;@-	 @o @q A@, @o
	
 A@.@*	
 A3 @o
 @o @q$extend @.CD'		@) A A
	
 A			$t_body 		$t_tidy X P$tailvar CD,	
	@7var  	CD. AX P ACD1@# 

	 A3 @o
 @o @q	
	 ACD4 @o
 @o @q	 AX P ACD8phrase 
	


@7 A	CD:@L@7 A	@- @q A@,	 A
 A@.
@*@-@- @o
 @q A@,	C 

 A@*	 A3	
 A@.
CDB @o A	 A3	
 ACDE
 @B

 @BCDF{} 
 

 A


CDG		@% 

 
	
	 A			 ACDJ@9 @2
 @2	
 A			$t_fill 	 A			 ACDM@9 @3
 @2	
 A			 A	 A			 ACDP@N @2 @1
 @2 @1	
	 A		 A			 A		 A			 ACDT@N @3 @1
 @2 @1	
	 A		 A			 A		 A			 ACDX		@% @1
 @1	
	 A			 ACD[ @;
 @;	
	 ACD] @o
 @o @q	 AX P ACDa 
 A


	@8 @d	CDc 


X P ACDf@.@8=..  
	
 A3@8 A
X P ACDk	
	@7 A	CDm @2 @2
	
 A		 ACDp@* 
 

@7 A 
 A 
 

 ACDt 
 

	
 A		 ACDw 
	X P ACDy 



X DD{ t  t t 
t  At  AP ACD @q AX P ACD @-

@7is_list  @,
	 A3@*X P$compile_wic  CD@.	@7$argv  	
$get_files_argv $get_wic_argv  AX P ACD@2 @q$open_wic @6$qlf_put_states    @ Au @U@.@8 Az A{ A   AB	 @ @U@6$close_wic   X P ACDCD-c 
CD AX P ACD a.out CD
-o 
CD AX P ACD 
	CD AX P A3CD 

CD

	
	 A3X Phalt  CD    BX DD t  t t at_halt DD t  t t $at_halt P B	CD
    B
 
 @X P$run_at_halt  CD@)		 B@9@*@:@.	X DD t  t t 
t $load_wic_files t $load_additional_boot_files  P BCD@3 	 A A{ @
 Au @U AB  A A{ A @	
 @UX P B CD@&@.	@7 A	
 A@- @q @v@,Loading additional boot files~n  @  Badditional boot files loaded~n  B@*@:X DD t Avc:/jan/pl/boot/load.pl  QFc:/jan/pl/boot/load.pl /7qsD t Avc:/jan/pl/boot/syspred.pl  QM$syspreds Fc:/jan/pl/boot/syspred.pl 0}@RsEgarbage_collect  Epredicate_property E @#E AEsave_program E BEshell  E A;E @E A<Estyle_check Eclause Eatom_to_term Edebugging  E AEabsolute_file_name E$defined_predicate Enospy E AEdefault_module E B"Edwim_match Evisible Eclause_property Enospyall  Ecurrent_module Esave Eopen_shared_object Ecurrent_predicate Espy Erecorda Earithmetic_function E B"Egensym Erequire Eleash E$predicate_property E @#E B@E B E @E BDEprolog_load_context Eplease E B'E @Eint_to_atom Econcat_atom E AS E B.XP$map_bits C@B
C@C
	
 Bf			 BfC@F @c
	
		@ 
@(C@I- 
	
		@ @(C@L? 

	
	@  @#X P$port_bit C@P  @(C@Q  @DC@R  @FC@S redo C@T unify C@U  A?C@V full C@W half 
X P BRC@Y@.
@8$leash  B

 Bn Bf BtX P B9C@^@.
@8$visible  B

 Bn Bf BwX P$map_style_check C@c  A`C@d singleton C@e dollar C@f  C@g string C@h  @ X P B$C@j@.
@8 A{ B

 Bz Bf A{X P B]C@oautoload  @Y @UC@qverbose_autoload  @W @UC@s$please X D@v t  Bt t 
t  @#t 
t  @#t 
t $trace t 
t  BHt  B2P BC@}
 Bh A? BVX P BVC@C@ BV	 BVC@	@(@6debug   B$find_predicate  @q @v@) A	$define_predicate 	 B	show_trace_point @9@*@:@.X Ptrace_alias C@  A?trace_call trace_redo trace_exit trace_fail C@  @( BC@  Bo BC@  @D BC@  @F BX P BC@C@ B	 BC@ Bh B	 @c
tag_list 	
 BC@ Bh @o @q B C@ Bi B	 Bj
 B	
 BC@ Bi @o @q B  C@
@7 A_ B	 Bh	 BX P BC@ C@@&
	 @o
 @o @q A	
	 BX P BGC@C@
 BG BGC@@#
 B A B@7$spy  B @Spy point on ~w~n  @o @q @~@9C@ X P B1C@C@
 B1 B1C@@ 
 B A@7$nospy  B @Spy point removed from ~w~n  @o @q @~@9C@ X P B=C@ 	
 BE 	
 B@9C@   X P B*C@  @6$debugging   BDebug mode is on; spy points (see spy/1) on:~n  B$show_spy_points  Trace points (see trace/1) on:~n  Bshow_trace_points  C@  Debug mode is off~n  BX P BC@@C 	
 BE 	
 BH$get_predicate_attribute @0 	
imported_from  B@,@1 	
 @~t~8|~w~n  @o @q @@9C@   X P BC@@6 	
 BE 	
trace_any  B@0 	
 B B@,@1 	
 B@9C@   X D@ t  Bt t 
t  Bt show_trace_ports P BC@
 @~t~8|~w:  @o
 @q B B@6nl   BX P BC@
 @o @q B B ~w  @o
 @q B@9C@ X P BbCA	 @CA@8 @ B	
X P @CA

  $term_to_atom X P B(CA
@7 A B  BX P B`CA
 BaX P BNCA@"$gs_  @	 @U@.
@8succ  B
	
 @U	
 @X P B7CA B8X DA" t  Bt t  A<P B#CA%
 BE@8$source_file  B	
X P A;CA)$time_source_file CA+@7 B	
 B- BX DA6 t  Bt t  B\P B[CA9 A@8  B

CA; @ @CA=stream @7current_input  B
CA?
 @ @@8 @ B
CABterm_position $stream_position      @X DAX t  Bt t 
t  BFt  B0P BECA\@7 B
@.@7 AH Bgenerate_current_predicate CA` @)@7 B@*@7 B	 BCAc
 @i B/CAf@" 
 B4 
 @i 
 B/CAk@! @Y @Z @Z @U 	
 	
 @`X P BCAq BW 
 @i 
 B/X P B/CAv
defined  BCAx	  BX DA{ t  Bt t 
t  Bt  BUP BCA@Iundefined  @e@)  A@7 B@*  BW
  A	
 @i@0	
 B/@,@1@0	
 BE@,@1CA
 BE BTX P BTCAinterpreted  @  BCAbuilt_in   BCAexported  B BCA @ @ BCA   BCA   BCA   BCA
 Bimported  BCA   BCA
indexed  B BCA @ B#CA
line_count  B BCAnotrace  @#  BCAshow_childs   B @%  BCAhashed  B B @#CAreferences  B B @#X DA t  Btindex t B; P B;CA B B$get_clause_attribute CA B @ BXDA t  Bt t 
t  B't  B'P B_CA@7 A B$clause 
 	
	$clause2 CA BE B
 	
	 BX P B&CA BE B 	 BX P BCA A
	

CA  AU
	X P BICA BJX P B3CA AX P BCA AX DA t  Bt t  BQP BPCA CA 

 @7$require  B
	 BPCA
require/1: Illegal predicate specifier: ~w  @o
 @q @ BPX P BWCA A=X P B?CA A= @q @vX P B,CA
@7 B	 BW$module CA @~w is not a current module  @o	 @q$break  BX P BdCB @trail 	 ARtrailused 
 ARlocal  ARlocalused  ARglobal 
 ARglobalused  AR AT ARinferences  AR AQ ARatoms  ARfunctors  ARpredicates  ARmodules  ARcodes  ARlocallimit  ARgloballimit  ARtraillimit  AR~2f seconds cpu time for ~D inferences~n  @o @o @q B~D atoms, ~D functors, ~D predicates, ~D modules, ~D byte-codes~n~n  @o @o @o @o @o @q B                      Limit    Allocated       In use~n  BHeap         :                  ~t~D~53| Bytes~n  @o @q BLocal  stack :~t~D~27| ~t~D~40| ~t~D~53| Bytes~n  @o @o @o @q BGlobal stack :~t~D~27| ~t~D~40| ~t~D~53| Bytes~n  @o @o
 @o @q BTrail  stack :~t~D~27| ~t~D~40| ~t~D~53| Bytes~n  @o @o	 @o
 @q Bgc_statistics  shift_statistics  X P CCB$@-collections 	 AR @#collected 
 ARgctime  AR~n~D garbage collections gained ~D bytes in ~2f seconds.~n  @o	 @o
 @o @q BCB,   X P CCB.@=local_shifts 	 ARglobal_shifts 
 ARtrail_shifts  AR@) @#@*@) @#@* @#~nStack shifts: ~D local, ~D global, ~D trail.~n  @o	 @o
 @o @q BCB8   X P BMCB?@8$shell  B	
X P B6CBB  BMX P B!CBESHELL 	getenv  B6CBH  /bin/sh  B6X Pdlopen_flag CBP now CBQ  BX Pmap_dlflags CBS  CBT	
 C" C	
	@ 
@(X P BCCBY
 C"	$open_shared_object X P BZCB]
 @o B @q BCX P BCBe @q BX P @CBh B
$write_on_string X P BYCBj
 B
 C&X P BeCBs@@-extensions 
select @,@:@.@.@.@*@8@- @ C*@,	file_type_conditions 		
 A3@*@.
@8 A B
 @o @ @q A@.@.@.@-	
solutions  C*@,@:@*first  A@.@8 C.
@-	file_errors  C*@,@:@* @F A@.@8 C.@-		 @@,@-	 C1 @e@,@*@:@*@-	 @F @e@,@9@*~w: No such file or directory  @@9X P C,CB 	txt  @CB 
prolog  @ @CB 
executable .so  @CB 
 A @ @CB 	 @ @X P B-CB
@7 @ B	@8 @ B	
CB @o @ @q @o @read  @q @@8 C:
CB @o @ @q @q @@8 C:
X P BCB   $garbage_collect X P BCB @q BXX P BXCB $autoload clear_library_index @8$save_program  B	
X P BACB BBX DB t  Bt t  BLP BKCB@9
 @) 
 A@*
 	
@  @(		  
$arithmetic_function X P B4CB 
	CB$default_module  @q @v B4X XI B BI B BI B BI B BI B BI B BI B! BI A; BI @ BI B# BI B$ BI B& BI B( BI B* BI B, BI B- BI B/ BI B1 BI B3 BI B4 BI B6 BI B7 BI B9 BI B; BI B= BI B? BI BA BI BC BI BE BI BG BI BI BI BK BI BM BI BN BI BP BI BR BI BT BI BV BI BW BI BX BI BY BI BZ BI B[ BI B] BI B_ BI @ BI B` BI Bb BI Bd BI Be BD t Avc:/jan/pl/boot/toplevel.pl  QM$toplevel Fc:/jan/pl/boot/toplevel.pl 0"sE B Einitialization E$abort  Eat_initialization E C{ E$set_prompt E$initialise  Etime E C6 E$welcome  E$compile  XD t  C{t t loaded_init_file P CCversion 	 @Welcome to SWI-Prolog (Version ~w)~n  @o	 @q @~Copyright (c) 1993-1995 University of Amsterdam.    @|All rights reserved.~n~n  @|For help, use ?- help(Topic). or ?- apropos(Word).~n~n  @|X P$load_init_file C@& AC@' CC@)@0
 @o @ @o~/  @q A @ C; @ C	asserta    @gC@/ X P$load_system_init_file  C@1    CC@3@' @	 @/plrc 
 @ C; @ C  C  
 @q ADC@9   X P$check_novice  C@;   @Z @Z$novice PROLOGCHILD  CCannot start Prolog from a child process running under Prolog~n  BPlease type Control-D or `exit' to return to Prolog~n  B BC@A   X P$load_gnu_emacs_interface  C@D@ EMACS t  C@.	@7 A C{	+C  @   @g A]emacs_interface C@I   X D@O t  C{t t 
t  Ct  C~D@R t  C{t t $at_initialization P CC@U
   C{ @ C 
X P$run_at_initialization  C@Y @0		saved_program  AU @@,	@1C@[@E@.	@7 C	-d  @@)@3
 C@-initialization(~p) ...   @o
 @q$feedback @,ok~n  @q C@9@*FAILED~n  @q Cat_initialization goal ~p failed~n  @o
 @q @@9@*@:@.
C@i@#@)	 C@-
@,
@9@* C @o	 @q @@9@*@:@.	X P CC@s
@8 B C{	
user_output flush_output X P C}C@{ CX P$set_file_search_paths  C@@@)@s@.	@7 C	
 @o-p  @o A3@0--  A@,@1@+@.@8 @ C{@-@,$search_path 
	 A@,	reverse  A C   @
forall @*-p: failed to parse ~w  @o @q @@6nodebug   C{@.
@.@.@.@,@:@/@9@*@:@.	@.
@.@.@.
@.@.@.X P CC@@#
$string 	@= A@8 C	
@.@8 A C{		$search_aliases X P CC@		@+
 C	@: A		$make_alias @.@8 C	
	 CC@
 C@.@8 C	
	 C@8 CX P CC@ @o A@.@8 C
	 AX P CC@ @@)@7 A_ C{
@.@*   @vC@@8 C
	X P$load_associated_file  C@@Iassociate 	 @ @o @o
 @q A@.@8prolog_to_os_filename  C{
 @ C; @@.@8 @ C{@7chdir  C{   ABSWI-Prolog --  
 @window_title 
 @6 B C{C@   X D@t  C{t @U$banner_goal v  CP CC@@I C$clean_history   C C C Cinit_file 	$option  Cgoal 
 C @@-
 C @e@,
 C	 @U@*@.@8 C   @= CX P CC@    A tell  A  @U A,  @U~nExecution Aborted~n~n  @| CX P C|C@@4 A	 @U@.
@8 B C{	
 A @UBreak Level [~w]~n  @o
 @q @~ CExit Break Level [~w]~n  @o
 @q @~ A @UX P CC@top_level 	 C
 @  
X P CC@   AX P CC@	
@^$tracing  @X @U A	 @U Ad@+@.
@8 B C{

$system_prompt |      A@6trim_stacks   C{h !h  @o @# @o A @q
read_history 	 A	
	call_expand_query @,		$execute @/[halt]~n  @q @~X DA t  C{t t $prompt P DCA @"@%@m@%@l@%@!@ @?@-@ 
X P CCA@.
@8 A1 C{	
 Dretractall  D
 @X P CCA@ D@-@1  @v@, @o@% @o@m @q @o	 @o @o@: @o@  @q @q	
$substitute @* @o@% @o@m @q @q	
 D@-@:  @v@, @o@% @o@l @q @o @o@[ @q @o
 @o @o@] @o@  @q @q	
 D@* @o@% @o@l @q @q	
 D@8 DX P DCA)
@1@+
convert_to 	
flatten  A3	 A3@,		 A3			 A3@/CA0 
X P DCA2 CA3
@7 @ C{@8 D
		 DCA7

		
 DX P CCA>@7 A C{	... 1,000,000 ............ 10,000,000 years later~n~n  @|~t~8|>> 42 << (last release gives the question)~n  @|@9CAC	 A~N  @|CAE@.@8 C $dwim_correct_goal 	
	$execute_goal CAI	@6 B  C{~nNo~n  @|@9X P DCAN @#@6 @{ C{~n  @| @q$write_bindings @9CAS@c@.@8 C  D$user_query 
  C A D
	$set_user_goal_attributes @)@(  D
@6flush   C{
call_expand_answer  D @|@+	
 D@,@6 D@7erase  C{@9@/@*@6 D D @|@7 D&@9@.
X P$user_call CAhX P DCAk 	 
 @" D @$ DX P DCAoYes~n  @|CAq
@/ Ad$output_bindings 
get_respons @- Bo @e@,@9@*@-
show_again  @e@,@9@*	 C~n~nYes~n  @q @X DA|t  C{t @U$toplevel_print_predicate v print P D,CA~ D+ @|CA A
$output_binding  C  write @6ttyflush   C{CA A
 D4 C B	 D,X P D4CA@+ C D7 C =   D7 D2 @U @o @o C @o
 @q A	X P D.CA@! Ad@6 D9@.
@7 @ C{
answer_respons @-again  @e@,Action?   @|@9@*X P D?CA DA @o@? @o@h @q @show_toplevel_usage  CA@% Bo @o@; @o@n @o@r @o@N @o@R @q @;~n $format_if_tty CA Bo @o@t @o@T @q @@6 D; [trace]~n  DFCA@% @N @o@c @o@  @o
 @o
 @o@y @o@Y @q @CA	@b D0@6break   C{CA D0print_predicate ~w~n  @o @q DG D2 @UCA DA~nUnknown action (h for help)~nAction?   @|@6 D9X P DLCA @ddisplay CA @w D8CA @p D3X P DCCA  ~nActions:~n  @|; (n, r):     redo    t:               trace & redo~n  @|b:            break   c (ret, space):  continue~n  @|d:            display p                print~n  @|w:            write   h (?):           help~n  @|X P DFCA @q DOX P DOCA	@6 @ C{ @~CA X DA t  C{t t 
t  Ct $time_call P CCA	
@f AT
 AR B AR DX B
 AR AT AR	@ @(	
@ @(@-	 @&@,Infinite  A@*		@ @(~D inferences in ~2f seconds (~w Lips)~n  @o @o @o @q @~	 A% @eX P DYCA A%CA  A.X DA t  C{t  t t expand_query DA t  C{t  t t  D\P CCA   D\	
CA 
	
X DA t  C{t  t t expand_answer DA t  C{t  t t  D^P D$CA   D^	
CA 
	X XI C| C{I C} C{I C C{I C C{I C C{I C C{I C C{I C C{I C C{I C C{I C C{D t Avc:/jan/pl/boot/listing.pl  QM$listing Fc:/jan/pl/boot/listing.pl .sElisting  Eportray_clause E DnXD t  Dlt t 
t  Dn t 
t  Dnt 
t  Dlt 
t $listing2 t $list_clauses P DmC@!	 BE@0 B B@,@1@6 B Dl
  Dr@9C@    X P DqC@%@7 A Dl	C@'C@(
 Dq DqC@+
 B DlX P DwC@/@" A@6 Dt B 	
 	
	 Du@9C@7 X P DuC@9 B B%   Undefined: ~w/~w~n  @o	 @o @q BC@< @ B%   Foreign: ~w/~w~n  @o	 @o @q BC@?
 		
notify_changed  @q$list_declarations  DsX P D|C@E@0@0
  		 A@,
@1  B @o  	 D|C@I@0@0
  		 A@,
@1  B @o  	 D|C@M@0@0
  		 A@,
@1  B @o  	 D|C@QC@R	$write_declarations @6 DtX P DC@UC@V
:- ~q.~n  @o
 @q B DX P D~C@Z@!@.
@7 AH Dl
 
 B&$list_module  A
 Do@9X P DC@b C@c
	C@d
~q:  @o	 @q BX P DzC@g@[   
 BE@0@!  
 B B@)  @e@*   CF@,@1@0  
  B@,@1
 %   NOTE: system definition has been overruled for ~w/~w~n~n  @o @o
 @q BC@p X P DoC@x$$VAR  numbervars $portray_clause @9C@| X P DC@~ A
 AU$portray_head @.put @6 DtC@ A
 D :-  D8indent $portray_body @. D@6 DtC@ A	 AU DX P DC@pprint X P DC@	 @B !  DC@ 
 @B !,  D	 D DC@ D@6 Dt$portray_indent noindent  DC@ 

	 D D  D	
 D DC@@0 @o @2 @o @3 @o @1 @q @(     D$portray_or @6 Dt D)  DC@$meta_call 	$portray_meta C@ DX P DC@@; @2 @1
@.@8 B Dl
	 D D@6 Dt D->    D		 D D@6 Dt D;     D	
 DC@@% @1@.
@8 D

	
 D D@6 Dt D D D	 DC@@% @2@.
@8 D

	
 D D@6 Dt D D D	 DC@@% @3@.
@8 D

	
 D D@6 Dt D|     D	 DC@@.@8 D
 D DX P DC@  @4C@  @<C@  @:C@  @;C@  @=X P DC@@R @	 @o 
 @o @2 @o @3 @o @1 @q @
 @7 D Dl
((  D@.@8 D		 D D@6 Dt	 D))  DC@ DX P DC@@!
@ 
@(@ @ @( D	$n_times @7tab  DlX P DC@ @@9C@ X P DC@$portray_variable $print X XI Dm DlI Do DlI Dq DlD t Avc:/jan/pl/boot/edit.pl  QM$edit Fc:/jan/pl/boot/edit.pl 01NsEedit  E DEmake  Eed  E DXD t  Dt  t t edit_source D t  Dt  t t  DD t  Dt t 
t  Dt  DP DC
 @@0qlf_file @,@1$edit_file $record_last $edit_load CNo such file.  Edit new file ~w  @o	 @q @ D D DX P DC@$ D	 BEdit file `~w'  @o	 @q @ DX P DC@)


@n
 B@) @o @q A@.@* A @Edit predicate `~w'  @o @q @ B
 B# B B 	 $edit_predicate    D 
   DX P DC@8@8@.	@8 B D		 D 	 
 BEdit predicate `~w/~w'  @o
 @o @q @ 	 
 DC@=@6 D 	 
 BEdit predicate `~w:~w/~w'  @o	 @o
 @o @q @ 	 
 DC@A  ed/0: You can only use ed/0 after ed/1!  @X P DC@D	 @ @X P DC@G@+ B@,@8 A D
@/C@J BIX P DC@M@' 
@+
 @@0	 D@,@1@,
  D@/C@R@! \= @+
 @@0 D@,@1@, D@/X P DC@Y   D	C@[@G 
  @+@)EDITOR 
 C@*
$default_editor @,@+@)	
	edit_command @*
	
$nopredicate  D@,	 B6 D@/@/C@f@$@+@) D
 C@*
 D@, D D B6 D@/X P DC@o	@g D@.@8 C D
@.@8file_base_name  D	@-@=	nosearch  D@,@.@8 A1 D @o@% @o@e @q	substitute  @o@% @o@f @q		 D@8 D
@*Don't know how to use editor `~w'  @o	 @q @@.@.@.@.C@y
	@s@.@8 D
@.@8 D	@+	search  D@,@.@8 D @o@% @o@e @q	 D @o@% @o@f @q		 D @o@% @o@s @q		 D @o@% @o@d @q	 D@8 D
@/X P DC@ top  D%e '%f' '-^%s' C@ vi  D%e '+/^%s' '%f' C@ emacs  D%e +%d '%f' C@ notepad  D%e %f C@  D%e '%f' X P DC@	
@,@+@.
@8 D

 A3	 A3@,		
 A3			 A3@/C@ 
X P DC@$update_library_index  	
 B@.@8time_file  D	@8@>  D
reload @9C@   X P DC@@X
 A	
 @t@- @q A@,  	 AB@.@.
@*@0@- @o @q A@, 	 AB@.
@* @o
 A 
	 AB@.X XI D DI D DI D DI D DI D DD t Avc:/jan/pl/boot/sort.pl  QM$sort Fc:/jan/pl/boot/sort.pl /ުsEmerge Epredsort Ekeysort Emerge_set XP EC

C
	C@&

@8@<  D	
 @o	 EC@&

@8 D D @o
		 EC@ 

@8 @e D	
		 EX P E C

C
	C@ 	
@A
@-@8@=<  D@,@8 A D	
 @o	 E @*@8 E @o
		 E X P EC@+length $keysort @8 E
X P EC@0	
@P

	
 Bj A	 E A@-@8 E
@,	 @o
 @o @q A@*	 @o @o
 @q AC@7



C@8	 

C@9		@,
@ 
@(	
@ @(	
 E		 E			$keymerge X P EC@@

C@A
	C@B	@S
 @o A @o A	 E A	 E A@-@8 E@,@8 E		
 E@*@8 E		
 EX D@L t  Dt t 
t  Et 
t $predsort t 
t $predmerge t 
t  Et $predcompare P EC@W E	
 E@8 E
X P EC@\		@F
		 E@)	>  A	
 @o @o @q A@*	
 @o @o @q AC@a

C@b
 
C@c

@/@ 
@(	plus 	 E			 E			
 EX P E C@j
C@k

C@l		@'
	
	 E		
				 EX P E!C@p E
 @o
		 E C@r
	
 @o	 E X P EC@u E	C@w < X XI E  DI E DI E DI E DD t Avc:/jan/pl/boot/bags.pl  QM$bags Fc:/jan/pl/boot/bags.pl *"4HsEsetof Ebagof E @tXD t  E(t t 
t  @ut 
t  E*t 
t  E,t assert_bag P @tCv  E- @q @o E E. @qcollect_bags @8 A E(C X P E)C@$ E+@8sort  E(X P E+C@.@4 @?	
$e_free_variables 
 @o E. A	
 E/ @q E0 E
	 A @q @vX P E/C@6mark  Bj$record_bag @8 E9 E(	
@9C@; X P E0C@=@.@.@8$collect_bag  E( @o E	 E0C@@ 
	X XI E) E(I E+ E(I @t E(D t Avc:/jan/pl/boot/apply.pl  QM$apply Fc:/jan/pl/boot/apply.pl /ުsEsublist E CEmaplist Echecklist XD t  ECt t 
t  EIt 
t  EGt 
t  EEt  CP EHC C	 EHX P EFC@! C@"
			
	 EFX P EDC@*C@+@ 
	 @o A	
	 EDC@/	 EDX P CC@6@0
@0@,@1@,@1X XI ED ECI C ECI EF ECI EH ECD t Avc:/jan/pl/boot/list.pl  QM$list Fc:/jan/pl/boot/list.pl *"4JsEintersection Enth1 E C*Elist_to_set Enth0 Eis_set E CE EEsubtract E D
Esubset E @Eunion Elast XP EC@8$length  EO	
C	@7 A EO
length2 X P EfC@#  C@$ Ef@8 B EO
X P C*C@+ 



C@,

	
	 C*X P @C@3C@4

	
	 @C@6

	
	 @X P EVC@=@7integer  EO	nth0_1 C@@@7 Ee	nth0_2 X P ElC@D 
C@E
@ @(	
	 EVX P EnC@I 	 
C@J
	 En@8 Eh
	X P ERC@R@7 Ei	@ @(	 ElC@V@7 Ee	 En	@  @(X P E`C@^ 
	C@_ E`X P CC@f @q$reverse X P EpC@i 

C@j
	
 @o
 EpX P D
C@p	 @q$flatten X P ErC@s
	

@7 Ee	C@u

C@v
	 Er	
	 ErC@y 	
	

X P EXC@ @9C@C@
@8 @ EO
@9C@

 EXX P ETC@ C@@8 Et	 ETC@

		
 ETX P EPC@C@
@8 Et
 @o A	
	 EPC@
	 EPX P E^C@

C@
@8 Et
	
 E^C@

	
	 E^X P E\C@C@@8 Et
	 E\X P EZC@C@
@8 Et
	
 EZC@

	
	 EZX XI EP EOI ER EOI C* EOI ET EOI EV EOI EX EOI C EOI E EOI EZ EOI D
 EOI E\ EOI @ EOI E^ EOI E` EOD t Avc:/jan/pl/boot/writef.pl  QM$writef Fc:/jan/pl/boot/writef.pl 01VsEwritef Ewrite_ln Eswritef E EE EXP EC@7 D E	@6 B EX P EC @q EX P EC@! @o$writefs @9C@$@7 B} E	@.@8string_to_list  E	 E@9C@)@7 A_ E	@.@8 A1 E	 E@9C@. X P EC@0 E
 C&X P EC@2
 E
 C&X P EC@8 C@9@%
$action 		
 EC@<		@7@%
@0@9 @ @o$getpad 	
		$padout 		 EC@A@\
$special @7 D E
	 EC@E@\
$getcode @7 E	
 EC@I@7 E	 EX P EC@N@t


@7 D3 EC@P@d


@7 DQ EC@R@w


@7 EC@T@q


@7writeq  EC@V@p


@7 EC@X	@f

@6 D: EC@Z@n


@7 EC@\@r

	
	$writelots C@^@s


	 EX P EC@a @n
C@b @l
C@c @r
C@d @t	C@e @\@\C@f @%@%X P EC@h$getdigits @8 E	@@"X P EC@m@/
 @#	
 A@0@9	
 @@ @(				 EC@s 
X P EC@u @#@7 E
@ @( EC@z X P EC@
 E@8 E	
		 A	 EX P EC@ @rr C@ @ll C@ @cc C@ @R EC@ @L EC@ @C EX P EC@ C@.@8 E		 EC@@  @@.
@8atom_length  E
	
 E@7 D E@7 E@7 EX P EC@ @9C@C@
 D EX P EC@ 
C@ 	C@@7 Ej E	@ @~ @X P EC@ E 	
@ @ @(C@ E 	@ @ @(C@@" E	@ @ @ @(	
@ 	@ @ @(X P EC@
@7 E
 EC@ X XI E EI E EI E EI E EI E ED t Avc:/jan/pl/boot/history.pl  QM$history Fc:/jan/pl/boot/history.pl 01PsE CEhistory_depth E CXD t  Et t  EP CC@  Ad	prompt_history @.@7$raw_read  E		
	read_history_ X P EC@&
	list_history  @9C@)


help_history @9C@,
@r	expand_history 		 B@-@7 A E@,@8 A E
@.@8 E@.@.@*@F@-@*	$silent  A@,   @=@.@7 E		
	 E@.@*	save_event 		write_event @8 E
@.@8 E@.@.X P EC@= AVC@> AU~w.~n  @o	 @q BX P EC@D@5$last_event 	 @U
history_depth_  E @$history_list  
 B~t~w   ~8|~w.~n  @o @o
 @q B@9C@L   X P CC@N
 E	 A@7 D' E	@9C@R  	 E  @UX P EC@U@<History Commands:~n  @|    !!.              Repeat last query~n  @|    !nr.             Repeat query numbered <nr>~n  @|    !str.            Repeat last query starting with <str>~n  @|    !?str.           Repeat last query holding <str>~n  @|    ^old^new.        Substitute <old> into <new> of last query~n  @|    !nr^old^new.     Substitute in query numbered <nr>~n  @|    !str^old^new.    Substitute in query starting with <str>~n  @|    !?str^old^new.   Substitute in query holding <str>~n  @|    ~w.~21|Show history list~n  @o	 @q @~    ~w.~21|Show this list~n  @o
 @q @~X P EC@e@@ E
 @U@.@8 B E
@.@8 A1 E	@.
@8 E
@- @o@% @o@! @q	
	 D@,@7prompt1  E@*@7 E	@.@6 D: EX P EC@s@8 @ E
	C@u@+ E @U@.@8 E E	 @U E 
 BI
 E		
remove_history X P EC@}
@  @$C@@ @( E  A@7 EC@ X P EC@ EC@ X P EC@@.@8 E		
expand_history2 @8 E

X P EC@@#@^ AU
get_last_event 	 @qold_new 			
substitute_warn C@expand_history3 X P EC@@#@!
@!	not_event_char  @o
	 EC@@#@! AU	
match_event 	
 A3		 EC@

	
	 EC@  AVX P EC@@^
	
	new C@


			 EX P FC@C@@^
C@

	
	 FX P EC@ E 
 B@8 E
	C@! No such event~n  @|@9X P DC@@!
 A3	 A3	
 A3			 A3X P EC@
	 DC@! bad substitution~n  @|@9X P FC@
find_event 	
	substitute_event C@ F @|@9X P F	C@@^
	
	 E		 DC@ 


	X Palpha C@	@a@z @C@	@A@Z @C@ @_X Pdigit C@	@0@9 @X Palpha_digit C@ FC@ F
X P EC@ F@9C@@?@9C@@!@9C@ X P FC@@?	
take_string substring 	
matching_event C@@!
 EC@@.
	 F
 @o
take_number @.@8 E E  B@8 E
CA Fprefix 	 FX P FCA

	 F	
	 FCA



CA X P FCA

	 F
	
	 FCA



CA X P FCA F E  B@8 E A3CA F E  B@8 E
 A3	
 A3X XI C EI E EI C ED t Avc:/jan/pl/boot/portray.pl  QM$portray Fc:/jan/pl/boot/portray.pl -tsE FE DXD t  Ft  t t portray D t  Ft  t t  F P FC FC   F 	X P FC D
@7 A_ F
~w  @o
 @q BC F"
$varname ~s  @o @q BC$VAR 
@7 F#
 F$ @o
 @q BC F(
 F% F' @o @q BX P F%C@#@"@A@  @(C@&@#@ 
@A@  @(	@ @A@  @(X XI F FI F FD t Avc:/jan/pl/boot/profile.pl  QM$profile Fc:/jan/pl/boot/profile.pl *sEprofile Eshow_profile Eprofiler XP F2C@.@8 F- F-$map_profile @7 A_ F-
 F6	 F5X P F6C  @X C cumulative C plain X P F0C@"@Striple 
 
$profile_count  

 @t@.@8 E4 F-	 C~w~t~w =~41|~t~w~57| = ~w ~t~w~79|~n  @oPredicate  @oBox Entries  @oCalls+Redos  @oExits+Fails  @oTime  @q B~61t~79|~n  B	$show_profile X P F=C@/ BE@0
 B B@,@1profile_count   @vX P FGC@5 C@6C@7@R F;
	
 @	
profile_box ~w~t~D =~41|~t~D+~D~57| = ~D+~D ~t~1d%~79|~n  @o @o @o @o @o @o @o @q B@.@8 B F-			 FGX D@? t  F-t t 
t  F/t $time_rval P F.C@C
@1 @o F: @o F9 @q @ @X F2@6reset_profiler   F- F2 FO @X F2 F0	 AU @eC@Lprofile/3: second argument should be one of {plain, cumulative}  @@9X P FSC@P	 AU CC@R  AVX XI F. F-I F0 F-I F2 F-D t Avc:/jan/pl/boot/dwim.pl  QM$dwim Fc:/jan/pl/boot/dwim.pl 0JsE DE BE @rE$similar_module XD t  FYt t 
t  Dt correct_goal P DC

	@7 A FY	C@  

 
		 D	
	 DC@  @2
 @2		 D	
	 DC@! 
 


@)@7 F]@*@7 F]
C@#
	 BEC@%dwim_predicate_list 	 F\C@( @x	 @q B@9X P F`C@,

@]
 	
 	 		 	 @o A	 @o A@.@7 AH FY				 @G	goal_name Correct to: `~w'  @o @q @C@7@1
 	
   FYhas_arity  @o @q ED @o @q	 F`C@< @x	 B@9X P FfC@@
  X P FbC@G @( EHgoal_name_ $goal_name  BI@9C@L
 Fj A@7 D' FYX P FhC@P_  FlC@Q@$  
~q:~q/~q  @o @o @o
 @q @C@S ~q/~q  @o @o @q @C@U ~q:~w  @o @o @q @C@W F$ @o	 @q @X D@f t  FYt t  BP BC@i
	@F@+ 	
name_arity @.@7 Fa@)	  @e@.@*@.@8 A FY@,			
	find_predicate @.@8 E4 FY		principal_predicates @/C@s@- 
 Fp 
$in_library 
 
 @t @q @vC@y @No predicates for `~w'  @o	 @q B@9X P FsC@}find_predicate_ 	
	
 @t	
 @q @vC@

@6find_sim_pred 	 @t		pack  E
	 A	print_pack_name Correct to `~w' 	 @X P FC@@# 
	 
 @o @o  @o
 @q BbC@@+  
 @o @o  @o
 @o  @o @q BbC@
 
	
C@ 
 @o @o  @o
 @q BbC@ 

X P FC@C@

@N  E				 @G 	pack_name 				pack_ 			 FX P FC@@>	
  C*  F				 @G				 FC@ 	

X P FC@ 
@7 F]
@7 F]	
	 C@ 
 

@7 F]		 C@ 
 @7 F]
	
		 C@ 
 

 			 X P F{C@@'same_module   BE	 		same_arity 			
 @GX P FC@	@7 F]	 BWC@
	 BWX P FC@@7 F]	C@ 
	X P F}C@@( 
	
sim_module  

	$dwim_predicate 	 	sim_arity X P FC@	@7 F]	 BWC@	
	 BWC@	 BW B7X P FC@@7 F]	C@@ @"X P FpC@	
	@7 A_ FY	C@ 



C@ C@Illegal predicate specification: `~w'  @o	 @q @@9X P FvC@@5find_definition 	 EF@-  @e@,find_public 	
 EF	
	
delete_defaults @*@.@8 Fr@.
	 ETX P FC@C@  
@8 @ FY
	
 FC@

	
	 FX P FC@@)      BE B   BTC@ 
	X P FC@@& B 	
 BT
 		
 @G	 FC@ 

X D@ t  FYt t 
t  @st  F_P @rCA  F^ AX P F^CA

	 BECA F	 E)CA FZ	 E)CA
@$   
 BW BE  E)X P FZCA@# 
	  BW	
 B7  BEX XI D FYI B FYI @r FYI FZ FYD t Avc:/jan/pl/boot/foreign.pl  QM$foreign Fc:/jan/pl/boot/foreign.pl 01NsEload_foreign E FEforeign_file XD t  Ft t 
t  Ft 
t load_foreign_ t  FP FC$foreign_file  BX P FC @ @  FX P FC@$@i AQ AR AT AR@)		
 F@*@: AQ AR AT AR		@ @(		@ @(confirm_files 	list_to_atom @.@7 AH F	module_spec Foreign file(s) ~w loaded~w, ~2f seconds, ~D bytes~n  @o @o @o @o @q @~X P FC@8  @C@9 into ~w  @o	 @q @X P FC@<C@=
	
confirm_file 		 FC@@ FX P FC@C A] A]check_files C@E 
	X P FC@G		@' F	 F F	 F				
$load_foreign 	record_foreigns X P FC@P @9C@QC@R
	
 F		 FC@U@& @o C( @o.o  @o.a  @o @ @q @o @ C; @q BeC@Z~w: No such foreign file  @o	 @q @@9X P FC@^	
	@7 @ F	C@`insert_spaces  BbX P FC@d

C@e
 D6
		
 FX P FC@hC@i
 F FC@l
 B-@) F B@* F B3X XI F FI F FI F FD t Avc:/jan/pl/boot/parms.pl  QFc:/jan/pl/boot/parms.pl 0]sD
 t  t  t @t @ @D t  t  t @t @~/lib/prolog Dt  t  t @t At @v t 
t @ @vt 
t @v/library vt B-vv P DC D @
 @win32  @C  DX XD t Avc:/jan/pl/boot/autoload.pl  QM C>Fc:/jan/pl/boot/autoload.pl 01NsE BE B Emake_library_index E FE FxE @`E DE BXD t  C>t t library_index D t  C>t t  FP @`C@ @"load_library_index   @)
		
 F@8 A C>	@*			
 FX P FxC@+ F F X D@4 t  C>t t  BP BC@7 B/C@9	
@c
 
  @Y @Z @Z @U		
 @` @[ @b @U@-@8 @e C>
@, @g @=@* 
 @m @o 
 @q @= @[	 @U BX P DC@K A]INDEX.pl 	 @@.
@8 @ C>	
update_library_index @9C@P   X P FC@R @o	 @o/INDEX.pl  @q
 Bb D8 @ FX P C? C@W  
 F DX P FC@^   FC@` A]INDEX 	 @@.
@8 F	
read_index @9C@e   X P FC@g
@*@.@7 A C>@7 A C>	 Ad@.@7 C; C>@-
	 A @e@,
@*	assert_index @9@6 A# C>@7 FX P FC@r@4 B
	  @o
 @o  @o @q Bb F
assertz C@vIllegal term in INDEX.pl of directory ~w: ~w  @o
 @o	 @q @X P FC@~ @o*.pl  @q FX P FC@
@> D8 @ @ B-@7 C C>	 F A
expand_index_file_patterns @-		
library_index_out_of_date @,Making library index for ~w ...   B@6 D" C>		
do_make_library_index  C B@*@:@7 FC@
make_library_index/1: Cannot write ~w  @o	 @q @X P FC@@'expand_file_name  EF D
	 @o F @oindex.pl  @oMake.pl  @omake.pl  @q EZX P FC@@0@7 @ C>	@,@1C@@,@.@8 D C>	@) @p D@8 D C>@.
@.@*
 A@.@8 F
@8 F@.X P FC@ D8open index_header index_file  EH@7close  C>X P FC@		@P C; F@.@8 C; C>@7 G 	 A A
 A @delete_suffix  A  @	index((~k), ~k, ~k, ~k).~n  @o @o @o
 @o @q CC@ X P GC@ @C@ 
	X P FC@/*  $Id: autoload.pl,v 1.6 1995/08/16 11:49:18 jan Exp $~n~n  @q @    Creator: make/0~n~n  @q @    Purpose: Provide index for autoload~n  @q @*/~n~n  @q @X P FC@   @q FX P FC@	@q  AC @Z
option @.@8 A{ C> Bh B| B$ B @X B]
needs_autoloading 
 @t B	 B] A{@-	 @q @e@,@:@.@.@*@& B B] B @Z B] B	 EH B	 B] B	 B] FX P GC@@4 
 
 B B@0 
 B B@,@1
 		
 FxX P G
C@@  
@- A @@,@:@*@8 F
X XI F C>I F C>I F C>I F C>I Fx C>I @` C>I D C>I B C>D t Avc:/jan/pl/boot/qlf.pl  QM$qlf Fc:/jan/pl/boot/qlf.pl 0]sEqload Eqcompile E ANXD t  Gt t 
t  Gt 
t  Gt 
t  Gt yesno P GCC
 G GC		
@j
  @o C( @o @ @o @ @q @o @ C; @q Be	 @
remove_suffix 	
 @ensure_suffix @7$qlf_open  G @ A @U@.@8  G
 AB 
 G!	 	 @	 @U@6$qlf_close   GX P G"C@0 @C@2 
	X P G$C@4
	 @C@6 @X P G*C@9@-@, AU A@* @F AX P GC@DC@E
 G GC@H @o A AC AU @q GX P G.C@K@ AQ AR AT AR
 	 @o C( @o @ @o @ @q @o @ C; @q Be 
$qlf_load @-@'@7 A_ G@,@- A @l @@,@:@* A? A	
		 A@@*@:@.@-@Q A AC AU @@, AQ AR AT AR	@ @(		@ @(		 AX	 AZ~N~w loaded~w, ~2f sec, ~D bytes.~n  @o @o @o @o @q @~@*
@:@.@.@.@.@.@.X P G C@l@+loaded  
		 G/		check_is_module @-
@7 G1@,	 A@@*@:X P G4C@u AU  A @o @q @C@w X XI G GI G GI G  GM D t Avc:/jan/pl/boot/topvars.pl  QMtoplevel_variables Fc:/jan/pl/boot/topvars.pl 01VsEverbose_expansion Eprint_toplevel_variables  XD t  G:t t  AC D t  G:t C}t fx $ P D]C@'expand_vars @.
@8free_variables  G:

	
	delete_bound_vars @- AC @8\=@=  G:	
@,	print_query @*@:X P GLC @( EH@7 E G:	 @p D@6 B G:@9C@# X P GAC@&


@7 A G:
C@(


@7 @ G:
C@*@" G@	
name_var @-
	
toplevel_var @,@*$~w: No such variable 	
 @C@0@#
 		
 	
@  @(	expand_args X P GXC@6
	C@7@)	 @	 GA	
	 @@  @(			
 GXX P GSC@> A

@8 @e G:	
C@@	 GSX P GFC@D C@E@&

	 A A	v_member 	
	 GFC@I
	 GFX P G[C@L@)@8 GZ	@*	 G[X P D_C@Q
	assert_bindings X P G]C@T C@U@.
 A A A$topvar  A
 D'
 C G_ B G]X P GUC@[
 G_ A	
 BX P G=C@^	
 GU$~w =~t~12|~p~n  @o	 @o
 @q B@9C@b   GUC@d  No defined toplevel variables~n  BX P G;C@h
 @Z AC D AC CC@k @X AC DX D@n t  G:t t 
t  t  D\t  t  D^O  D]C@r  G: D]	
X O  D_C@t  G: D_	
X XI G; G:I G= G:XXDDt  t v  DDt  t A{v XX