PNG  IHDRX cHRMz&u0`:pQ<bKGD pHYsodtIME MeqIDATxw]Wug^Qd˶ 6`!N:!@xI~)%7%@Bh&`lnjVF29gΨ4E$|>cɚ{gk= %,a KX%,a KX%,a KX%,a KX%,a KX%,a KX%, b` ǟzeאfp]<!SJmɤY޲ڿ,%c ~ع9VH.!Ͳz&QynֺTkRR.BLHi٪:l;@(!MԴ=žI,:o&N'Kù\vRmJ雵֫AWic H@" !: Cé||]k-Ha oݜ:y F())u]aG7*JV@J415p=sZH!=!DRʯvɱh~V\}v/GKY$n]"X"}t@ xS76^[bw4dsce)2dU0 CkMa-U5tvLƀ~mlMwfGE/-]7XAƟ`׮g ewxwC4\[~7@O-Q( a*XGƒ{ ՟}$_y3tĐƤatgvێi|K=uVyrŲlLӪuܿzwk$m87k( `múcE)"@rK( z4$D; 2kW=Xb$V[Ru819קR~qloѱDyįݎ*mxw]y5e4K@ЃI0A D@"BDk_)N\8͜9dz"fK0zɿvM /.:2O{ Nb=M=7>??Zuo32 DLD@D| &+֎C #B8ַ`bOb $D#ͮҪtx]%`ES`Ru[=¾!@Od37LJ0!OIR4m]GZRJu$‡c=%~s@6SKy?CeIh:[vR@Lh | (BhAMy=݃  G"'wzn޺~8ԽSh ~T*A:xR[ܹ?X[uKL_=fDȊ؂p0}7=D$Ekq!/t.*2ʼnDbŞ}DijYaȲ(""6HA;:LzxQ‘(SQQ}*PL*fc\s `/d'QXW, e`#kPGZuŞuO{{wm[&NBTiiI0bukcA9<4@SӊH*؎4U/'2U5.(9JuDfrޱtycU%j(:RUbArLֺN)udA':uGQN"-"Is.*+k@ `Ojs@yU/ H:l;@yyTn}_yw!VkRJ4P)~y#)r,D =ě"Q]ci'%HI4ZL0"MJy 8A{ aN<8D"1#IJi >XjX֔#@>-{vN!8tRݻ^)N_╗FJEk]CT՟ YP:_|H1@ CBk]yKYp|og?*dGvzنzӴzjֺNkC~AbZƷ`.H)=!QͷVTT(| u78y֮}|[8-Vjp%2JPk[}ԉaH8Wpqhwr:vWª<}l77_~{s۴V+RCģ%WRZ\AqHifɤL36: #F:p]Bq/z{0CU6ݳEv_^k7'>sq*+kH%a`0ԣisqにtү04gVgW΂iJiS'3w.w}l6MC2uԯ|>JF5`fV5m`Y**Db1FKNttu]4ccsQNnex/87+}xaUW9y>ͯ骵G{䩓Գ3+vU}~jJ.NFRD7<aJDB1#ҳgSb,+CS?/ VG J?|?,2#M9}B)MiE+G`-wo߫V`fio(}S^4e~V4bHOYb"b#E)dda:'?}׮4繏`{7Z"uny-?ǹ;0MKx{:_pÚmFמ:F " .LFQLG)Q8qN q¯¯3wOvxDb\. BKD9_NN &L:4D{mm o^tֽ:q!ƥ}K+<"m78N< ywsard5+вz~mnG)=}lYݧNj'QJS{S :UYS-952?&O-:W}(!6Mk4+>A>j+i|<<|;ر^߉=HE|V#F)Emm#}/"y GII웻Jі94+v뾧xu~5C95~ūH>c@덉pʃ1/4-A2G%7>m;–Y,cyyaln" ?ƻ!ʪ<{~h~i y.zZB̃/,雋SiC/JFMmBH&&FAbϓO^tubbb_hZ{_QZ-sύodFgO(6]TJA˯#`۶ɟ( %$&+V'~hiYy>922 Wp74Zkq+Ovn錄c>8~GqܲcWꂎz@"1A.}T)uiW4="jJ2W7mU/N0gcqܗOO}?9/wìXžΏ0 >֩(V^Rh32!Hj5`;O28؇2#ݕf3 ?sJd8NJ@7O0 b־?lldщ̡&|9C.8RTWwxWy46ah嘦mh٤&l zCy!PY?: CJyв]dm4ǜҐR޻RլhX{FƯanшQI@x' ao(kUUuxW_Ñ줮[w8 FRJ(8˼)_mQ _!RJhm=!cVmm ?sFOnll6Qk}alY}; "baӌ~M0w,Ggw2W:G/k2%R,_=u`WU R.9T"v,<\Ik޽/2110Ӿxc0gyC&Ny޽JҢrV6N ``یeA16"J³+Rj*;BϜkZPJaÍ<Jyw:NP8/D$ 011z֊Ⱳ3ι֘k1V_"h!JPIΣ'ɜ* aEAd:ݺ>y<}Lp&PlRfTb1]o .2EW\ͮ]38؋rTJsǏP@芎sF\> P^+dYJLbJ C-xϐn> ι$nj,;Ǖa FU *择|h ~izť3ᤓ`K'-f tL7JK+vf2)V'-sFuB4i+m+@My=O҈0"|Yxoj,3]:cо3 $#uŘ%Y"y죯LebqtҢVzq¼X)~>4L׶m~[1_k?kxֺQ`\ |ٛY4Ѯr!)N9{56(iNq}O()Em]=F&u?$HypWUeB\k]JɩSع9 Zqg4ZĊo oMcjZBU]B\TUd34ݝ~:7ڶSUsB0Z3srx 7`:5xcx !qZA!;%͚7&P H<WL!džOb5kF)xor^aujƍ7 Ǡ8/p^(L>ὴ-B,{ۇWzֺ^k]3\EE@7>lYBȝR.oHnXO/}sB|.i@ɥDB4tcm,@ӣgdtJ!lH$_vN166L__'Z)y&kH;:,Y7=J 9cG) V\hjiE;gya~%ks_nC~Er er)muuMg2;֫R)Md) ,¶ 2-wr#F7<-BBn~_(o=KO㭇[Xv eN_SMgSҐ BS헃D%g_N:/pe -wkG*9yYSZS.9cREL !k}<4_Xs#FmҶ:7R$i,fi!~' # !6/S6y@kZkZcX)%5V4P]VGYq%H1!;e1MV<!ϐHO021Dp= HMs~~a)ަu7G^];git!Frl]H/L$=AeUvZE4P\.,xi {-~p?2b#amXAHq)MWǾI_r`S Hz&|{ +ʖ_= (YS(_g0a03M`I&'9vl?MM+m~}*xT۲(fY*V4x@29s{DaY"toGNTO+xCAO~4Ϳ;p`Ѫ:>Ҵ7K 3}+0 387x\)a"/E>qpWB=1 ¨"MP(\xp߫́A3+J] n[ʼnӼaTbZUWb={~2ooKױӰp(CS\S筐R*JغV&&"FA}J>G֐p1ٸbk7 ŘH$JoN <8s^yk_[;gy-;߉DV{c B yce% aJhDȶ 2IdйIB/^n0tNtџdcKj4϶v~- CBcgqx9= PJ) dMsjpYB] GD4RDWX +h{y`,3ꊕ$`zj*N^TP4L:Iz9~6s) Ga:?y*J~?OrMwP\](21sZUD ?ܟQ5Q%ggW6QdO+\@ ̪X'GxN @'4=ˋ+*VwN ne_|(/BDfj5(Dq<*tNt1х!MV.C0 32b#?n0pzj#!38}޴o1KovCJ`8ŗ_"]] rDUy޲@ Ȗ-;xџ'^Y`zEd?0„ DAL18IS]VGq\4o !swV7ˣι%4FѮ~}6)OgS[~Q vcYbL!wG3 7띸*E Pql8=jT\꘿I(z<[6OrR8ºC~ډ]=rNl[g|v TMTղb-o}OrP^Q]<98S¤!k)G(Vkwyqyr޽Nv`N/e p/~NAOk \I:G6]4+K;j$R:Mi #*[AȚT,ʰ,;N{HZTGMoּy) ]%dHء9Պ䠬|<45,\=[bƟ8QXeB3- &dҩ^{>/86bXmZ]]yޚN[(WAHL$YAgDKp=5GHjU&99v簪C0vygln*P)9^͞}lMuiH!̍#DoRBn9l@ xA/_v=ȺT{7Yt2N"4!YN`ae >Q<XMydEB`VU}u]嫇.%e^ánE87Mu\t`cP=AD/G)sI"@MP;)]%fH9'FNsj1pVhY&9=0pfuJ&gޤx+k:!r˭wkl03׼Ku C &ѓYt{.O.zҏ z}/tf_wEp2gvX)GN#I ݭ߽v/ .& и(ZF{e"=V!{zW`, ]+LGz"(UJp|j( #V4, 8B 0 9OkRrlɱl94)'VH9=9W|>PS['G(*I1==C<5"Pg+x'K5EMd؞Af8lG ?D FtoB[je?{k3zQ vZ;%Ɠ,]E>KZ+T/ EJxOZ1i #T<@ I}q9/t'zi(EMqw`mYkU6;[t4DPeckeM;H}_g pMww}k6#H㶏+b8雡Sxp)&C $@'b,fPߑt$RbJ'vznuS ~8='72_`{q纶|Q)Xk}cPz9p7O:'|G~8wx(a 0QCko|0ASD>Ip=4Q, d|F8RcU"/KM opKle M3#i0c%<7׿p&pZq[TR"BpqauIp$ 8~Ĩ!8Սx\ւdT>>Z40ks7 z2IQ}ItԀ<-%S⍤};zIb$I 5K}Q͙D8UguWE$Jh )cu4N tZl+[]M4k8֦Zeq֮M7uIqG 1==tLtR,ƜSrHYt&QP윯Lg' I,3@P'}'R˪e/%-Auv·ñ\> vDJzlӾNv5:|K/Jb6KI9)Zh*ZAi`?S {aiVDԲuy5W7pWeQJk֤#5&V<̺@/GH?^τZL|IJNvI:'P=Ϛt"¨=cud S Q.Ki0 !cJy;LJR;G{BJy޺[^8fK6)=yʊ+(k|&xQ2`L?Ȓ2@Mf 0C`6-%pKpm')c$׻K5[J*U[/#hH!6acB JA _|uMvDyk y)6OPYjœ50VT K}cǻP[ $:]4MEA.y)|B)cf-A?(e|lɉ#P9V)[9t.EiQPDѠ3ϴ;E:+Օ t ȥ~|_N2,ZJLt4! %ա]u {+=p.GhNcŞQI?Nd'yeh n7zi1DB)1S | S#ًZs2|Ɛy$F SxeX{7Vl.Src3E℃Q>b6G ўYCmtկ~=K0f(=LrAS GN'ɹ9<\!a`)֕y[uՍ[09` 9 +57ts6}b4{oqd+J5fa/,97J#6yν99mRWxJyѡyu_TJc`~W>l^q#Ts#2"nD1%fS)FU w{ܯ R{ ˎ󅃏џDsZSQS;LV;7 Od1&1n$ N /.q3~eNɪ]E#oM~}v֯FڦwyZ=<<>Xo稯lfMFV6p02|*=tV!c~]fa5Y^Q_WN|Vs 0ҘދU97OI'N2'8N֭fgg-}V%y]U4 峧p*91#9U kCac_AFңĪy뚇Y_AiuYyTTYЗ-(!JFLt›17uTozc. S;7A&&<ԋ5y;Ro+:' *eYJkWR[@F %SHWP 72k4 qLd'J "zB6{AC0ƁA6U.'F3:Ȅ(9ΜL;D]m8ڥ9}dU "v!;*13Rg^fJyShyy5auA?ɩGHRjo^]׽S)Fm\toy 4WQS@mE#%5ʈfFYDX ~D5Ϡ9tE9So_aU4?Ѽm%&c{n>.KW1Tlb}:j uGi(JgcYj0qn+>) %\!4{LaJso d||u//P_y7iRJ߬nHOy) l+@$($VFIQ9%EeKʈU. ia&FY̒mZ=)+qqoQn >L!qCiDB;Y<%} OgBxB!ØuG)WG9y(Ą{_yesuZmZZey'Wg#C~1Cev@0D $a@˲(.._GimA:uyw֬%;@!JkQVM_Ow:P.s\)ot- ˹"`B,e CRtaEUP<0'}r3[>?G8xU~Nqu;Wm8\RIkբ^5@k+5(By'L&'gBJ3ݶ!/㮻w҅ yqPWUg<e"Qy*167΃sJ\oz]T*UQ<\FԎ`HaNmڜ6DysCask8wP8y9``GJ9lF\G g's Nn͵MLN֪u$| /|7=]O)6s !ĴAKh]q_ap $HH'\1jB^s\|- W1:=6lJBqjY^LsPk""`]w)󭃈,(HC ?䔨Y$Sʣ{4Z+0NvQkhol6C.婧/u]FwiVjZka&%6\F*Ny#8O,22+|Db~d ~Çwc N:FuuCe&oZ(l;@ee-+Wn`44AMK➝2BRՈt7g*1gph9N) *"TF*R(#'88pm=}X]u[i7bEc|\~EMn}P瘊J)K.0i1M6=7'_\kaZ(Th{K*GJyytw"IO-PWJk)..axӝ47"89Cc7ĐBiZx 7m!fy|ϿF9CbȩV 9V-՛^pV̌ɄS#Bv4-@]Vxt-Z, &ֺ*diؠ2^VXbs֔Ìl.jQ]Y[47gj=幽ex)A0ip׳ W2[ᎇhuE^~q흙L} #-b۸oFJ_QP3r6jr+"nfzRJTUqoaۍ /$d8Mx'ݓ= OՃ| )$2mcM*cЙj}f };n YG w0Ia!1Q.oYfr]DyISaP}"dIӗթO67jqR ҊƐƈaɤGG|h;t]䗖oSv|iZqX)oalv;۩meEJ\!8=$4QU4Xo&VEĊ YS^E#d,yX_> ۘ-e\ "Wa6uLĜZi`aD9.% w~mB(02G[6y.773a7 /=o7D)$Z 66 $bY^\CuP. (x'"J60׿Y:Oi;F{w佩b+\Yi`TDWa~|VH)8q/=9!g߆2Y)?ND)%?Ǐ`k/sn:;O299yB=a[Ng 3˲N}vLNy;*?x?~L&=xyӴ~}q{qE*IQ^^ͧvü{Huu=R|>JyUlZV, B~/YF!Y\u_ݼF{_C)LD]m {H 0ihhadd nUkf3oٺCvE\)QJi+֥@tDJkB$1!Đr0XQ|q?d2) Ӣ_}qv-< FŊ߫%roppVBwü~JidY4:}L6M7f٬F "?71<2#?Jyy4뷢<_a7_=Q E=S1И/9{+93֮E{ǂw{))?maÆm(uLE#lïZ  ~d];+]h j?!|$F}*"4(v'8s<ŏUkm7^7no1w2ؗ}TrͿEk>p'8OB7d7R(A 9.*Mi^ͳ; eeUwS+C)uO@ =Sy]` }l8^ZzRXj[^iUɺ$tj))<sbDJfg=Pk_{xaKo1:-uyG0M ԃ\0Lvuy'ȱc2Ji AdyVgVh!{]/&}}ċJ#%d !+87<;qN޼Nفl|1N:8ya  8}k¾+-$4FiZYÔXk*I&'@iI99)HSh4+2G:tGhS^繿 Kتm0 вDk}֚+QT4;sC}rՅE,8CX-e~>G&'9xpW,%Fh,Ry56Y–hW-(v_,? ; qrBk4-V7HQ;ˇ^Gv1JVV%,ik;D_W!))+BoS4QsTM;gt+ndS-~:11Sgv!0qRVh!"Ȋ(̦Yl.]PQWgٳE'`%W1{ndΗBk|Ž7ʒR~,lnoa&:ü$ 3<a[CBݮwt"o\ePJ=Hz"_c^Z.#ˆ*x z̝grY]tdkP*:97YľXyBkD4N.C_[;F9`8& !AMO c `@BA& Ost\-\NX+Xp < !bj3C&QL+*&kAQ=04}cC!9~820G'PC9xa!w&bo_1 Sw"ܱ V )Yl3+ס2KoXOx]"`^WOy :3GO0g;%Yv㐫(R/r (s } u B &FeYZh0y> =2<Ϟc/ -u= c&׭,.0"g"7 6T!vl#sc>{u/Oh Bᾈ)۴74]x7 gMӒ"d]U)}" v4co[ ɡs 5Gg=XR14?5A}D "b{0$L .\4y{_fe:kVS\\O]c^W52LSBDM! C3Dhr̦RtArx4&agaN3Cf<Ԉp4~ B'"1@.b_/xQ} _߃҉/gٓ2Qkqp0շpZ2fԫYz< 4L.Cyυι1t@鎫Fe sYfsF}^ V}N<_`p)alٶ "(XEAVZ<)2},:Ir*#m_YӼ R%a||EƼIJ,,+f"96r/}0jE/)s)cjW#w'Sʯ5<66lj$a~3Kʛy 2:cZ:Yh))+a߭K::N,Q F'qB]={.]h85C9cr=}*rk?vwV렵ٸW Rs%}rNAkDv|uFLBkWY YkX מ|)1!$#3%y?pF<@<Rr0}: }\J [5FRxY<9"SQdE(Q*Qʻ)q1E0B_O24[U'],lOb ]~WjHޏTQ5Syu wq)xnw8~)c 쫬gٲߠ H% k5dƝk> kEj,0% b"vi2Wس_CuK)K{n|>t{P1򨾜j>'kEkƗBg*H%'_aY6Bn!TL&ɌOb{c`'d^{t\i^[uɐ[}q0lM˕G:‚4kb祔c^:?bpg… +37stH:0}en6x˟%/<]BL&* 5&fK9Mq)/iyqtA%kUe[ڛKN]Ě^,"`/ s[EQQm?|XJ߅92m]G.E΃ח U*Cn.j_)Tѧj̿30ڇ!A0=͜ar I3$C^-9#|pk!)?7.x9 @OO;WƝZBFU keZ75F6Tc6"ZȚs2y/1 ʵ:u4xa`C>6Rb/Yм)^=+~uRd`/|_8xbB0?Ft||Z\##|K 0>>zxv8۴吅q 8ĥ)"6>~\8:qM}#͚'ĉ#p\׶ l#bA?)|g g9|8jP(cr,BwV (WliVxxᡁ@0Okn;ɥh$_ckCgriv}>=wGzβ KkBɛ[˪ !J)h&k2%07δt}!d<9;I&0wV/ v 0<H}L&8ob%Hi|޶o&h1L|u֦y~󛱢8fٲUsւ)0oiFx2}X[zVYr_;N(w]_4B@OanC?gĦx>мgx>ΛToZoOMp>40>V Oy V9iq!4 LN,ˢu{jsz]|"R޻&'ƚ{53ўFu(<٪9:΋]B;)B>1::8;~)Yt|0(pw2N%&X,URBK)3\zz&}ax4;ǟ(tLNg{N|Ǽ\G#C9g$^\}p?556]/RP.90 k,U8/u776s ʪ_01چ|\N 0VV*3H鴃J7iI!wG_^ypl}r*jɤSR 5QN@ iZ#1ٰy;_\3\BQQ x:WJv츟ٯ$"@6 S#qe딇(/P( Dy~TOϻ<4:-+F`0||;Xl-"uw$Цi󼕝mKʩorz"mϺ$F:~E'ҐvD\y?Rr8_He@ e~O,T.(ފR*cY^m|cVR[8 JҡSm!ΆԨb)RHG{?MpqrmN>߶Y)\p,d#xۆWY*,l6]v0h15M˙MS8+EdI='LBJIH7_9{Caз*Lq,dt >+~ّeʏ?xԕ4bBAŚjﵫ!'\Ը$WNvKO}ӽmSşذqsOy?\[,d@'73'j%kOe`1.g2"e =YIzS2|zŐƄa\U,dP;jhhhaxǶ?КZ՚.q SE+XrbOu%\GتX(H,N^~]JyEZQKceTQ]VGYqnah;y$cQahT&QPZ*iZ8UQQM.qo/T\7X"u?Mttl2Xq(IoW{R^ ux*SYJ! 4S.Jy~ BROS[V|žKNɛP(L6V^|cR7i7nZW1Fd@ Ara{詑|(T*dN]Ko?s=@ |_EvF]׍kR)eBJc" MUUbY6`~V޴dJKß&~'d3i WWWWWW
Current Directory: /usr/lib64/guile/2.0/ccache/srfi
Viewing File: /usr/lib64/guile/2.0/ccache/srfi/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� g vector-fold� gvector-fold-right� g vector-map� g vector-map!� gvector-for-each� g vector-count� !g vector-index� "gvector-index-right� #g vector-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� 0g make-vector� 1gvector� 2gvector?� 3g vector-ref� 4g vector-set!� 5g vector-length� 6012345� 7g replacementsS� 8g vector-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!� g vectors-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� 9g case-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<5 4?>"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 gnameg vectors-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�C h�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�C h��)�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 4 5 >"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 � #�� � � ��*    �  � �  gnameg vector-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 ��  J gnamegvector-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 �  gnameg vector-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��50 h ~)�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 � gnameg vector-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��5 h�)�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 � gnameg vector-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  � R gfilenamefsrfi/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