# FASL compiled from "/home/common-lisp.ru/yavannadil/oci/oci-rest.lisp" at Monday, July 14, 2008 05:55:45 AM [+0] on cymraeg.ru using SBCL version 1.0.17 X86-64M1.0.17'(:GENCGC :SB-PACKAGE-LOCKS :SB-UNICODE)QSB-IMPLR %DEFPACKAGEOCI-REST COMMON-LISPOCICFFI$$1/home/common-lisp.ru/yavannadil/oci/oci-rest.lispQSB-C DEFINITION-SOURCE-LOCATIONRQR( $$$- QLSTRUCTURE-OBJECTR ($$$-QSB-SYS STRUCTURE!OBJECTR ($$$-($$$-18 LSETL *PACKAGE*8QOCI-RESTR KISSFFTL MAKE-INSTANCEQCFFIR FOREIGN-LIBRARYNSPECNUNIX libkissfft.so!"NDEFAULT libkissfft$%&'NOPTIONS7LFUNCALLL FDEFINITIONLSETF GET-FOREIGN-LIBRARY.7)8 LOAD-FOREIGN-LIBRARY8 %DEFUN KISS-FFT-ALLOC>2#BL SIGNED-BYTE$ 33$#$I$$(NSTANDARDNMINIMAL$$$$N$$#$$#$$#$$#( 6NEXTERNAL TL-XEP19Q COMPILED-DEBUG-FUNR Q DEBUG-FUNR (<$$$-=(>$$ $-?1 @$c#$c$$(45$$,##$,##$$$D$$$d( A1?1 B(C1Q COMPILED-DEBUG-INFOR Q DEBUG-INFOR (F$$$-G(H$$$-I1JK;2EHeHLHUH ]H]LEHuHUL %(HHH9HHH9AIHH9IHH9Hu$<Fg#B$#$?$$(45$$$$N$$#$$#$$#(g78fh?1 i$U#$U$$(45$$$$D$$$d$$#(jf?1 k(lfI1mn;2EHeHHUH}HuH%HU$<xB~#B33$#$I$$(45$$$$N$$#$$#$$#$$#( ~78}?1 $c#$c$$(45$$,##$,##$$$D$$$d( }?1 (}I1;2EHeHLHUH ]H]LEHuHUL %(HHH9HHH9AIHH9IHH9Hu$<F#B$#$?$$(45$$$$N$$#$$#$$#(78?1 $U#$U$$(45$$$$D$$$d$$#(?1 (I1;2EHeHHUH}HuH%HU$<xB#B33$#$M$$(45$$$$N$$#$$#$$#O$$#$$#( 78?1 $k#$k$$(45$$$$D$,##$,#O#$$$d$$#( ?1 (I1;2EHeHLHuH}H(yHUH]LMHuH}L%HU$<RB#B$#$?$$(45$ $$$N$$#$$#$$#(78?1 $U#$U$$(45$ $$$D$$$d$$#(?1 (I1;2EHeHHUH}HuH%HU$<xB#B33$#$M$$(45$ $$$N$$#$$#$$#O$$#$$#( 78?1 $k#$k$$(45$ $$$D$,##$,#O#$$$d$$#( ?1 (I1;2EHeHLHuH}H(yHUH]LMHuH}L%HU$<RB#B$#$?$$(45$ $$$N$$#$$#$$#(78?1 $U#$U$$(45$ $$$D$$$d$$#(?1 (I1;2EHeHHUH}HuH%HU$<xB#B33$#$M$$(45$ $$$N$$#O$$#$$#$$#$$#( 78?1 $k#$k$$(45$ $,#O#$,##$$$D$$$d$$#( ?1 (I1;2EHeLLHUH]H(ILMLUHuHUH]H%AIHH9IHH9Au$IHH9|IHH9~H Hu$<F#B333$#$T$$(45$ $$$N$$#$$#O$$#$$#$$#$$#(78?1 $v#$v$$(45$ $,##$,#O#$,##$$$D$$$d$$#( ?1  ( I1  ;2 EHeLLLHUH]HuH0LULmLuHUH]HuH%ASIHH9=IHH9'AIHH9IHH9Au$IHH9|IHH9~H HU$<B#B33$#$M$$(45$$$$N$$#$$#O$$#$$#$$#( 78?1 $k#$k$$(45$$,##$,#O#$$$D$$$d$$#( ?1 (I1 ;2EHeLLHUH]H(9LELMHuHUH]H%AIHH9IHH9Au$IHH9|IHH9~H OHMHHH fHnHU$<B6#yBQSB-INTR 6LIST-OF-LENGTH-AT-LEAST-P< 6PROPER-LIST-OF-LENGTH-P< BACKQ-LISTb#p B1<f< CHAIRY-DATA-VECTOR-SET< CHAIRY-DATA-VECTOR-REFHEH]HML%AH%HHҹ HeHmH%HHҹ HeHmH%HHҹ HeHmjL%AAXjL%A^jL%A^jL%A_j L%A^QNABSOLUTER alloc_trampc QNABSOLUTER alloc_trampP QNABSOLUTER alloc_tramp= QNABSOLUTER alloc_tramp* QNABSOLUTER alloc_tramp QNABSOLUTERfreeQNABSOLUTERfreeQNABSOLUTERfreeQNABSOLUTERQ UNWINDRQNABSOLUTERQ UNWINDRQNABSOLUTERQ UNWINDRQNABSOLUTER boxed_regionQNABSOLUTER boxed_region QNABSOLUTER boxed_regionQNABSOLUTER boxed_regionjQNABSOLUTER boxed_region\QNABSOLUTER boxed_regionPQNABSOLUTER boxed_regionQNABSOLUTER boxed_region QNABSOLUTER boxed_regionQNABSOLUTERmallocbQNABSOLUTERmallocQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_region=a COMPLEX-VECTORWYLSEQUENCE[<$$$ ^ INC-POINTER$$$$$$$$f$$$$$$ ^%FOREIGN-ALLOC$$$$$ ^ NULL-POINTER$$$$$$1$$$$$(  WITH-FOREIGN-SLOTS$$$$$$$$$$$$$ ^WITH-FOREIGN-POINTER WITH-FOREIGN-OBJECT$$$$5(($$180  C-FFT-2D!># BLARRAY-DIMENSION!$uB<$$p$?$$(45$$$$N$$#(!78 "?1 #$H$u$H$$(45$$$#($ ?1 %(& I1'(;u2EHeHu+HHֿO Hu` N=) *W\+$$,(-(./$$1080 C-FFT-2D&MAGS!>2# B<5$(?no ACLEANUP-FUN-[#:|EXIT-TAG-[#:EXIT-TAG-[C-FFT-2D&MAGS!]436]473|]481A?1 B#? # #? $$(+OC5$(Dno CLEANUP-FUN-[C-FFT-2D&MAGS!]434F?1 G( HI1IJ; 2EHHUHUHH1HFHkHP HBHUHHHUHHkHP HBHUHHHUHHkHP HBHUHHHUHHkHP HBHHHHkHP HBHMHMHUH}HHH %H8HHHHр %h L%IKH9 % H %IHNHIHA4%h t HH% HH%8 H %8 HHHHH%h HHiHHAHH%h HEHEH;EH}HHH %H8HHHHр %h L%IKH9 % H %IHNHIHA4%h t HH% HH%8 H %8 HHHHHH%h HHiHHAHHH%h H}HHH %H8HHHHHH% HH%8 H %8 HHHHxH%h HHiHHAHxH%h HH0H %h L%ICH9%H%IHNH@HH4%h t HUH}1HHKHHKHCH0HkHP HBHEHEH;EHEHEH;E|HMHHMHUH}L%AHBH}L%AHBHUHHHUH(HkHP HBHHHHHHkHP HBHBHHUHEH@1H}HHH}HH %h L%Is H94%qH4%IH&HvV^4%h t HmHkHP HBHHHUH3HkHP HBHHHEH@1HMHHHMHEH@fH~H HHTHMHHMHH%h HH%h HHHHHBHH HEH%h HH%h HHHIHHHBHH HEvH%h HH%h HHHIHHHBHH HEHUH}HݹHmHc cHEHEH;E|HMHHMHUH}L%AHBH}L%AHBHHHHkHP HBHHHHHgHkHP HBHBHEHMHMHEH@1H}HHH}HHHUH*HkHP HBHHHHkHP HBHHHHkHP HBHH fHnHEHEH@1H}HHH}HHHUHHkHP HBHHHHkHP HBHHHeHkHP HBHH fHnHE@HMHHM"HUH]HMHHH%8 H %8 HH% H9t8HBH tHRtHJHHHBHBHH9uH% HHHIHHHBHH HEHEH]HML%AHUH]HMHHH%8 H %8 HH% H9t8HBH tHRtHJHHHBHBHH9uH% HHHIHHHBHH HEHEH]HML%AHUH]HMHHH%8 H %8 HH% H9t8HBH tHRtHJHHHBHBHH9uH% HHHHHBHHHE>HEH]HML%AH%HHҹ HeHmH%HHҹ HeHmH%HHҹ HeHmjL%AYjL%AYjL%AX#j L%A^QNABSOLUTER alloc_tramp QNABSOLUTER alloc_tramp QNABSOLUTER alloc_tramp QNABSOLUTER alloc_trampv QNABSOLUTERfreeC QNABSOLUTERfree QNABSOLUTERfree QNABSOLUTERQ UNWINDR QNABSOLUTERQ UNWINDR5 QNABSOLUTERQ UNWINDRy QNABSOLUTERQ  GENERIC-+R QNABSOLUTERQ  GENERIC-*R QNABSOLUTER boxed_region<QNABSOLUTER boxed_region.QNABSOLUTER boxed_region"QNABSOLUTERQ  GENERIC-+RzQNABSOLUTERQ  GENERIC-*RgQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTERmallocQNABSOLUTER boxed_regioniQNABSOLUTER boxed_region[QNABSOLUTER boxed_regionOQNABSOLUTERmalloc#QNABSOLUTER boxed_regionpQNABSOLUTER boxed_regionbQNABSOLUTER boxed_regionVQNABSOLUTERmalloc*=o1*WYL SIMPLE-ARRAYq[rs<$$$t$$$$$$$$u$$$$$$v$$$$$w(x$$$$$$y$$$$$$$$$ zww$$$${{tt(|(}~$$180 C-REAL-FFT-2D!>#CB<<<<cHEH]HML%AH%HHҹ HeHmH%HHҹ HeHmH%HHҹ HeHmjL%AAX^jL%AYjL%AXjL%AYyjL%A_!j L%A^QNABSOLUTER alloc_tramp6QNABSOLUTER alloc_tramp#QNABSOLUTER alloc_trampQNABSOLUTER alloc_trampQNABSOLUTER alloc_trampQNABSOLUTER alloc_trampQNABSOLUTERfreeQNABSOLUTERfreeQNABSOLUTERfree\QNABSOLUTERQ UNWINDRQQNABSOLUTERQ UNWINDRQNABSOLUTERQ UNWINDR QNABSOLUTERQ  GENERIC-+R] QNABSOLUTERQ  GENERIC-*RJ QNABSOLUTER boxed_region QNABSOLUTER boxed_region QNABSOLUTER boxed_region QNABSOLUTERQ  GENERIC-*R4 QNABSOLUTERQ  GENERIC-+R QNABSOLUTERQ  GENERIC-*R QNABSOLUTERQ  GENERIC-+R QNABSOLUTERQ  GENERIC-+R QNABSOLUTERQ  GENERIC-+R QNABSOLUTERQ  GENERIC--R QNABSOLUTERQ  GENERIC-+R QNABSOLUTERQ  GENERIC-+R QNABSOLUTERQ  GENERIC->Rq QNABSOLUTERQ  GENERIC-+RA QNABSOLUTERQ  GENERIC--RQNABSOLUTERQ  GENERIC-+ReQNABSOLUTERQ  GENERIC-+RJQNABSOLUTERQ  GENERIC--R/QNABSOLUTERQ  GENERIC-+RQNABSOLUTERQ  GENERIC-<RQNABSOLUTERQ  GENERIC-+RQNABSOLUTERQ  GENERIC--RQNABSOLUTERQ  GENERIC--RQNABSOLUTERQ  GENERIC-+RQNABSOLUTERQ  GENERIC-+RQNABSOLUTERQ  GENERIC-+RQNABSOLUTERQ  GENERIC-<RsQNABSOLUTERQ  GENERIC-<RlQNABSOLUTERQ  GENERIC-<R@QNABSOLUTERQ  GENERIC-<RQNABSOLUTER boxed_regionJQNABSOLUTER boxed_region<QNABSOLUTER boxed_region0QNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionuQNABSOLUTERmallocIQNABSOLUTERmallocQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionuQNABSOLUTER boxed_regioniQNABSOLUTER boxed_region;QNABSOLUTER boxed_region-QNABSOLUTER boxed_region!=*W<$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$( $$$$$$$$$$ $$$$$5$$$(($$180 C-FOURIER-CORRELATION!>#Y B<<<<b<<c<d<e<f<$# $B$$(45$$`$ #$ #(78?1  $J# $J$$(45$$ #$ #$( ?1  # #Y # $$(+O 5$( no 7CLEANUP-FUN-[#:EXIT-TAG-[C-FOURIER-CORRELATION!]640]675?1 # #Y # $$(+O5$(no ICLEANUP-FUN-[#:|EXIT-TAG-[#:EXIT-TAG-[C-FOURIER-CORRELATION!]640]677|]712?1 # #Y # $$(+O5$(no 'CLEANUP-FUN-[C-FOURIER-CORRELATION!]638?1 ( I1; Y 2EHHUH}HUHH1HRHkHP HBHUHUHHH$HkHP HBHUHHHUHHkHP HBHUH<HH %H8HHHHр %h L%IKH9 % H %IHNHIHA4%h t HH% HH%8 H %8 HHHHH%h HHiHHAHH%h HEHEH;EH}HHH %H8HHHHр %h L%IKH9 % H %IHNHIHA4%h t HH% HH%8 H %8 HHHHHH%h HHiHHAHHH%h HEHEH;EH}HHH %H8HHHHHH% HH%8 H %8 HHHHxH%h HHiHHAHxH%h HH(H %h L%ICH9%H%IHNH@HH4%h t HUH}HHHKHCH(HkHP HBHEHEH;EHEHEH;E|HMHHMHUH}L%AHBH}L%AHBHHHnHkHP HBHHHUHEH@1H}HHH}HHfH~H HHHkHP HBHMHHM-H%h HH%h HHHHHBHH HEH%h HH%h HHHIHHHBHH HEKH%h HH%h HHHIHHHBHH HEWHUHeHmHEHEH;E|HMHHMHUH}L%AHBH}L%AHBHHHHkHP HBHHHHHHkHP HBHBHEHMHMHEH@1H}HHH}HHHUH^HkHP HBHHHEHkHP HBHHH,HkHP HBHH fHnHEHEH@1H}HHH}HHHUHHkHP HBHHHHkHP HBHHHHkHP HBHH fHnHE@HMHHM"HEHEH;E|HMHHMHUH}L%AHBH}L%AHBHHHHkHP HBHHHHHHkHP HBHBHEHMHMHEH@1H}HHH}HHHUHxHkHP HBHHH_HkHP HBHHHFHkHP HBHH fHnHEHEH@1H}HHH}HHHUHHkHP HBHHHHkHP HBHHHHkHP HBHH fHnHE@HMHHM"HUH]HMHHH%8 H %8 HH% H9t8HBH tHRtHJHHHBHBHH9uH% HHHIHHHBHH HEHEH]HML%AHUH]HMHHH%8 H %8 HH% H9t8HBH tHRtHJHHHBHBHH9uH% HHHIHHHBHH HEHEH]HML%AHUH]HMHHH%8 H %8 HH% H9t8HBH tHRtHJHHHBHBHH9uH% HHHHHBHHHE>HEH]HML%AH%HHҹ HeHmH%HHҹ HeHmH%HHҹ HeHmjL%AYjL%AYjL%AX;QNABSOLUTER alloc_trampL QNABSOLUTER alloc_tramp9 QNABSOLUTER alloc_tramp& QNABSOLUTERfree QNABSOLUTERfree QNABSOLUTERfree QNABSOLUTERQ UNWINDR QNABSOLUTERQ UNWINDR QNABSOLUTERQ UNWINDR+ QNABSOLUTERQ  GENERIC-+RQNABSOLUTERQ  GENERIC-*RQNABSOLUTERQ  GENERIC-+RQNABSOLUTERQ  GENERIC-*RQNABSOLUTERQ  GENERIC-+R<QNABSOLUTERQ  GENERIC-*R)QNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionsQNABSOLUTERmallocQNABSOLUTER boxed_regionQNABSOLUTER boxed_region QNABSOLUTER boxed_regionQNABSOLUTERmallocQNABSOLUTER boxed_region"QNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTERmalloc=B F1 F2EW[F<$$$G$$$$$$$$H$$$$$$I$$$$$J(K$$$$$$L$$$$$$$MJJ$$$$NNGG(O(PQ$$1R80 C-ROTATE>T#&B<<2<3<e<<c<$#$B$$(45$$`$ #$ #(T78SU?1 V$J#$J$$(45$$ #$ #D(WS?1 X##&#$$(+OY5$(Zno )CLEANUP-FUN-[#:EXIT-TAG-[C-ROTATE]754]777\?1 ]##&#$$(+O^5$(_no CLEANUP-FUN-[C-ROTATE]752a?1 b(cI1de; &2EHHUH}HUHH1HbHkHP HBHUHHHUH4HkHP HBHUHHHUHHkHP HBHUHHHUHHkHP HBHHHHkHP HBHMHMHUH}HH %H8HHHHH@H% HH%8 H %8 HHHHHH%h HHiHHAHHH%h HEHEH;EH}HH %H8HHHHH8H% H H%8 H %8 H(H0HHxH%h HHiHHAHxH%h HUHHHlHkHP HBHHH(H8 %h L%IKH9 %FH %IHNHIHA4%h t H@ %h L%ICH9% H%IHNH@HP4%h t HUH}HCHKH(HkHP HB1H;uM1L;E| HNHHuLEH}HL%AHBLEIL%AHBLEHuHH8HHHEH@1HHHLHEH@HTIHLlH%h HH%h HHH@H8HBHH HEsH%h HH%h HHH@H@HBHH HE\HUHeHmHEHEH;E|HMHHMHUH}L%AHBH}L%AHBHUHUHEH@1H}HHH}HHHHkHP HBHMHHH@Hˆ HMHHMPHUH]HMHHH%8 H %8 HH% H9t8HBH tHRtHJHHHBHBHH9uH% HHH@H@HBHH HEHEH]HML%AHUH]HMH(H0H%8 H %8 H H% H9t8HBH tHRtHJHHHBHBHH9uH% HHH@H8HBHHHEHEH]HML%AH%HHҹ HeHmH%HHҹ HeHmjL%AYjL%AXQNABSOLUTER alloc_trampQNABSOLUTER alloc_trampQNABSOLUTERfreeQNABSOLUTERfreeQNABSOLUTERQ UNWINDRQNABSOLUTERQ UNWINDRQNABSOLUTERQ  GENERIC-+RQNABSOLUTERQ  GENERIC-*RQNABSOLUTERQ  GENERIC-+RQNABSOLUTERQ  GENERIC-*RQNABSOLUTER boxed_region QNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTERmallocQNABSOLUTERmalloc*=~S AW[Yq[<$$$$$$$$$$$$((($$180 COMMIT-ADULTERY>#BGRAY>#BQJPEGR  DECODE-IMAGE#6B~~/Desktop/~a~a.pnmLFORMAT<  READ-NETPBM<  PAD-IMAGE<.= TRESHOLD-FOURIER!<$#$?$$(45$$$$N$$#(78?1 $`#$`$$(4$($$ SUFFIX#(?1 (I1; 62EHeHtHuHU NHdH]HE HEkHuHH  H="#BLABS>#B AVERAGE< C %UNARY-ROUND<#$# $?$$(45$$$$N$$#(@7% GBCD?1 E$M#%$M$$(45$$$$d(FC?1 G(H.I1IJ;2 EHeHHUHUHUHHH%  HBH HeHmHSHpH  %h L%IKH9 %jH %IHI4%h t HA HA HHHMkLHQ$<3HZ %h L%ISH9%H%IHR4%h t HZHB HIPHI$<HH yHOHܺ H9tqHIH$<t OHH)HHH)HSH{HsHHkHPHBHt t$<(B<v<HHHHHkHP HBHUHHpH ! %h L%IKH9 %H %IHI4%h t HA HA HHHMkLHQ$<HZ %h L%ISH9%H%IHR4%h t HZHB HIPHI$<HH yHOHܺ H9tqHIH$<t OHH)HHH)HSH{HsHHkHPHBHtt$<B<v<uuHHHHGHkHP HB %h L%IKH9 %H %IHI4%h t H]HYHQHuH H  N jL%AY jL%AZ O jL%AY jL%AZL OjL%AY?QNABSOLUTER alloc_trampQNABSOLUTER alloc_tramp}QNABSOLUTER alloc_trampeQNABSOLUTER alloc_trampHQNABSOLUTER alloc_tramp0QNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_region_QNABSOLUTER boxed_regionQQNABSOLUTER boxed_regionEQNABSOLUTER boxed_region4QNABSOLUTER boxed_region&QNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_region=_CBWYLLIST[ab>d#B HOUGH+SOBEL-CIRCLE-TRANSFORM< GRAYSCALE-IMAGE<<<cQNABSOLUTER alloc_trampQNABSOLUTER alloc_trampQNABSOLUTER alloc_trampQNABSOLUTER alloc_trampQNABSOLUTER boxed_region5QNABSOLUTER boxed_region'QNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionVQNABSOLUTER boxed_regionHQNABSOLUTER boxed_region<QNABSOLUTER boxed_regionQNABSOLUTER boxed_regionxQNABSOLUTER boxed_regionlQNABSOLUTERQ  GENERIC->R=!*bh$$$$$d$$$$$$e$$$$$>$$$$$$$$$$$ >$$$$$$$$$$$ ( ($$180  UNITE-CENTRES>#eB  *REC-NUM-HOR*"<.?LNUMBER$#@$?$$(45$$$$N$$#$$#(7)?1 $Q#E$Q$$(45$$$$d$$#((?1 (DEFUN UNITE-CENTRESI1;e2 EHeHHUH}HHHHRt(t#$<A<v<<*HL%AHBHUHU$<HRH}؋$<}HL%AHBHHHHkHP HBHHUL%AHBH HHHHRt(t#$<A<v<<*H=~HL%AHBHUHEHH$<HQHEHH$<HyL%AHBHHHHkHP HBHHUL%AHBH tO HeHm H O H O N     O OQNABSOLUTERQ  GENERIC->RQNABSOLUTERQ  GENERIC--RQNABSOLUTERQ  GENERIC-*RyQNABSOLUTERQ  GENERIC->RQNABSOLUTERQ  GENERIC--RQNABSOLUTERQ  GENERIC-*R=('<>#BLSECOND<ghHEHPHeHm H OHEO HHHUHHkHP HBLEHH}H(u2EHeHHʋ$<HHP$<HR$<HR$<HR$<HRHeHm2EHeHkHUH}H HAHRSHEHHHUH}HhHkHP HBHHUL%AHBH u HeHmO 퐐 NjL%AAX O    O O O O OjL%AYv O O O O OjL%AY<    j0L%A[jL%AY O N O     N OQNABSOLUTER alloc_trampQNABSOLUTER alloc_trampQNABSOLUTER alloc_trampZQNABSOLUTER alloc_tramp.QNABSOLUTER alloc_trampQNABSOLUTERQ  GENERIC->RQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionxQNABSOLUTER boxed_region.QNABSOLUTER boxed_region QNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionyQNABSOLUTER boxed_regionm=('<WY[`  LSTW[a$$$$$$$$$$$$$ !$$$$$$$$$$ h$$$$(($$180 RECOGNIZE-NUMBER>#B"< *JOIN-CENTRES-PIXELS*  *REC-NUM-VER*#$#p$?$$(45$$$$N$$#$$#(7)?1 $Q#u$Q$$(45$$$$d$$#((?1 (DEFUN RECOGNIZE-NUMBERI1;2 EHeH'HUH}H xHAHRHEHU$<HRH}؋$<HL%AHBHHH)HkHP HBHH]HHpHRHuHMt t$<YA<v<Jt t$<'C<v<@t!@t$<F<v<HUHL%AHBHuH]H tHHL%AHBH u HeHmH 4HAHRHEHEHPHEHxL%AHBHHHHkHP HBHHUL%AHBH t O r hH H HEH O N O    OQNABSOLUTERQ  GENERIC->RQNABSOLUTERQ  GENERIC--RQNABSOLUTERQ  GENERIC-<RQNABSOLUTERQ  GENERIC-<RbQNABSOLUTERQ  GENERIC--R=('<>#rB  HOR-POINT<&#&BY<NT1.333?'N MASK-COOKED-P FOURIER-SEARCH<<<h<%RQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regiont=G*+)$$$$$$$$$$$$ H$$$$$$Ih$$$$$J$$$$$$$$$$$$$ K(L$$$$$$$$M(N(OP$$1Q8$ $$1R8$$$ 1S8 *JOIN-CENTRES-ANGLES*$$$!1U8$$$"1V8 *NUMBER-RECTS*$Z$#$xXY$$#1Z80 SWITCH-RESOLUTION>\#BYW$B$#$X\]$#$?$$(45$$$$$N$$#(^78[_?1 `$L#$L$$(45$$$$$O(a[?1 b(c[I1de;2 EHeHHHuUHtHPHlPHPHd8HPHdHUHPHJHeHmH` t HHPH8HPH(HPHHHPH뙐 N=f[.gbW$$$$$hhhhW$$$$$iiii(j(kl$$$1m80  GET-CENTRES>o#BLAPPEND<< LOGARITHM-FILTER<< NEGATE-GRAYSCALE-IMAGE<  SHRINK-IMAGE<TNDEBUG-P FOURIER-MELLIN-SEARCH< FILTER-CENTRES<  JOIN-CENTRES#BBi<#?<~~/im/all/~a-~a-~a-~a-~a-~a.pnm X<z<$# $?$$(45$&$$$N$$#$$#(78?1 $a# $a$$(4$$($&$ CENTRES#$#(?1 ##3##$$(45$&$$$N$$#(7?1 #1#8#1$$(45$&$$$D(?1 (I1; 2EHeHtHuHL NHA HX %h L%IK H9 %H %IHI HA6HBHA4%h t LAHHHu` 2*EHeHXHHUH HU$<HJ$<HIH uO HeHmHEHH$<HI$<HYH]tt$<u`C<v<uUPHL%AHBH]H uO 뀿HL%AHBH tٺ VH HU$<HJ$< HIH HEHH$<HH@HEHI$<HAHEHEHH$<HI$<HI$<HIHt t$<1A<v<"HHHHkHP HBLHEHH$<HHI$<=LIHEHH$<*HI$<HI$<HI$< HAHH@ H=JH5KHMHKHMHKLCLKHCH0@HkHP HBHEHH$<HyHHHHkHP HB-H Oj L%AYb N  O O O  O O O O O O O O O O O O OQNABSOLUTER alloc_tramp&QNABSOLUTERQ  GENERIC-<RQNABSOLUTERQ  GENERIC->RQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regiont=WY[ [W YLORp\\f CEXTENDED-SEQUENCE[z$&$$$$$$(($$&180  FIND-NUMBERS>#B<?<~~/im/bad/~a-~a-~a-~a-~a-~a.pnm<z< APPEND2<#~~/im/~a-~a-~a-~a-~a-~a.pnm$#$?$$(45$'$$$N$$#$$#(78?1 $f#$f$$(4$$($'$#$#(?1 (%1   I1  ; 2EHeHtHu HUH} NHUHE %h L%IKH9 %H %IHI4%h t HA HA HMHHMHM$HUHEH@HEHM$<<HH@HEHEHH$<"HQHHHHkHP HBHHuHuH} $<HHPHUHHH%  HBHuH0HFHEHM$<HH@HEHEHH$<HAHEHEHH$<hHI$<]HI$<RHIHt t$<A<v<HHHHkHP HBLHEHH$<HI$<LIHEHH$<HI$<HI$<HI$<HAHH@ H=HuHMHKHMHKLCLKHCH@HkHP HBHEHH$<THyHHHHkHP HBHM$<$HH@HEHEHH$< HAHEHEHH$<HI$<HI$<HIHt t$<XA<v<IHHHHkHP HBHHUH} %h L%I[0H9%hH%IH[HHPHH@HxHH@HpH@ 4%h t HHHHUHpHkHP HB %h L%IKH9 %H %IHI4%h t HQHA HH]HKHEHHHMHM$<H HEHPHeHmH OH OHFHEHM$<fHH@HEHEHH$<LHAHEHEHH$<5HI$<*HI$<HIHt t$<.A<v<HHHHkHP HBLHEHH$<HI$<LIHEHH$<HI$<HI$<HI$<HAHH@ H=|HuHMHKHMHKLCLKHCH5@HkHP HBHEHH$<!HyHHHHkHP HBHH OjL%AYp O O  O O O O O O O O O O O O O O O O Oj0L%A[jL%AY O O O O O O O O O O O O OQNABSOLUTER alloc_trampQNABSOLUTER alloc_trampQNABSOLUTER alloc_trampQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_regionQNABSOLUTER boxed_region%QNABSOLUTER boxed_regionQNABSOLUTER boxed_region QNABSOLUTER boxed_regionQNABSOLUTER boxed_region~QNABSOLUTER boxed_regionr= [W az$'$$$$$$$z$'$$$$$$$$'$$$$$$$ (!("#$$'1$80  UNITE-NUMBERS>&#B"<$#`$?$$(45$($$$N$$#$$#(&7)?1 '$Q#e$Q$$(45$($$$d$$#(((?1 )(*DEFUN UNITE-NUMBERS+I1,-;2EHeHHUH}H HAHRHEHU$<HJ$<HI$<HI$<HI$<HQH}؋$<HO$<HI$<HI$<HI$<HyL%AHBHHHHkHP HBHHUL%AHBH H HAHR$HEHEHH$<HI$<HI$<HQHEHH$<HI$<HI$<HyL%AHBHHHHkHP HBHHUL%AHBH u HeHmO  搐 N O  O O O O  O O O O O O O O O O OQNABSOLUTERQ  GENERIC->R)QNABSOLUTERQ  GENERIC--RQNABSOLUTERQ  GENERIC->RMQNABSOLUTERQ  GENERIC--R=6('<>8#BB<$#P$?$$(45$($$$N$$#(87D?1 9$M#U$M$$(45$($$$D(:C?1 ;##Z#$$(45$($$$N$$#$$#(<7)?1 =##_#$$(45$($$$D$$$d(>(?1 ?(@+I1AB;2EHeHHUH=HHHUHHkHP HB$<HRHeHm2EHeHqHUH}HU$<^HJ$<SHI$<HHQH}$<9HO$<0HI$<%HyL%AHBH HEHH$<HI$<HQHEHH$<HI$<HyL%AHBH u HeHmO HEHH$<HQHEHH$<wHyL%AHBH u 랺O 뗐 N  N  O O  O O O O O O O OQNABSOLUTERQ  GENERIC->R)QNABSOLUTERQ  GENERIC->RQNABSOLUTERQ  GENERIC-=R]=I('<IJICB>L#B7gh<KLSTRING<<<<$#$B$$(45$($$$N$$#(M78%N?1 O$P#$P$$(45$($$#(P%?1 Q(R(I1ST; 2EHeHHH}Ѐ %h L%MCL9%sL%MM@4%h t LEI@ I@ LEHHH H}H5 HCO H HkHP HBLEHIHUHVHHHuHHkHPHBHu %h L%IKH9 %H %IHI4%h t HQHA HH]HKHv$<HH [HEHPH=HxH tcH1HHH tTo HMH u` NjL%AAXjL%AYA   QNABSOLUTER alloc_trampQNABSOLUTER alloc_trampQNABSOLUTER boxed_regionFQNABSOLUTER boxed_region8QNABSOLUTER boxed_region,QNABSOLUTER boxed_regionvQNABSOLUTER boxed_regionhQNABSOLUTER boxed_region\=]%bh$($$$^(_$($$$$$$$`$($$$$$$$a(b(cd$$(1e80 FM-JPEG-SEARCH>g#BBn<<<<i<$#$C$$(45$)$$$N$$#$$#$$#$$#( g78fh?1 i$z#$z$$(4$$$$(j$)$#$$D$#$#( kfl?1 m#6##$$(45$)$$$N$$#(n7%opq?1 r###$$(45$)$$$O(sp?1 t(uI1vqvw;2 EHeH]HtH uHUH}HuH] NHUH}HuHE HH HUH}HuHEHCH< HkHP HBHHH}HHkHP HBHHH}HHkHP HBHHHHH Ho HMH u` 24EHeHuPHʋ$<uA@