ELF@@8@ZZ@Z@Z@ZppC ; ?T ?; ?T ?;@TA;BTBTB|BBqUBGP 0@p`' 0 T B|  BBqU BG ' - >T B4 oG ;?' - >T B4 ) B H H H T B4 )U BB 0> EL <L H H  T @4 ); BH  T @4 ); BH  T @4 ); BH  T @4 ); BH  T @4 ); BH  T @4 ); BH  T @4 ); BH  T @4 ); BH  T @4 ); BH  T @4 ); ~BH  T @4 ); {BH  T @4 ); xBH  T @4 ); uBH  T @4 ); rBH  T @4 ); oBH  T xB4 ); vBH  T @4 ); sBH  T @4 ); pBH  T @4 ); mBH  T @4 ); jBH  T @4 ); gBH  T @4 ); dBH  T @4 ); aBH  T A4 ); ^BH  T @4 )B 0L <L H H  T @4 ); PBH  T @4 ); MBH  T @4 )B 0L < L  H H  T @4 ); ?BH  T @4 ); EL<LH'^B'0'  G '0|4TA| ?AqUAG|#} EK>ar0KrM>rB FH '&A%A&A& B'B B0>EL<LH' B'P' @G@'P||5TyA|>vAqUpAG|$}!EK>ar0KrM>r B FHP'&qA%A&A&A'A p'p P`@' Pp' TA| Tr@TA4oUAGP`'@ 'A p'p P`@' Pp' T|A| T=@TA4oUqAGP`'@ 'A p'p P`@' Pp' TYA| T@T\A4oUNAGP`'@ ']A p'p P`@' Pp' T6A| T?T9A4oU+AGP`'@ ':A '7 ' P`p@' P'  T A|  T ?T A4 oU @G `Pp'@ ' A p'p P`@' Pp' T@| T_?T@4oU@GP`'@ '@ B0>EL<LH'@  B@>EL< LGHH'@G'G' @G@'PG'@ B0>EL<LH'@  B@>EL< LGHH'@G'G' PGP'`|G'`'@ B0>EL<LH'x@  B@>EL< LGHH'l@G'G' PGP'`|G'`'_@  TL@| T}>TO@4oUA@GB0>EL< LH;A@ 'C@  B@>EL< LGHH'7@G'G' @G@'PG'!@ B0>EL<LH'@G'G' |G''@ 'Q@T?|=?qU?GP'@|| }ET?|Y;?qU?G~0B0>EL<wLH@'T?| T=T?4oU?GP'@|?T?| T=T?4oU?GP'@|T?|b=?qU?GP'@|'%?B0>EL<<LH@'B0>EL<ILH@'B0>EL<VLH@'? 0T?| TR=T?4oU?GG 00@'? 0T?| T8=T?4oU?GG 00@'? 0T?| T=T?4oU?GG 00@'? `T?| T=T?4oU?GGP`'P|}G'`'T?;9;?B HHB HHB HH$@?   '0B0>EL<LH 'o?  B@>EL< LHGH'c?G'G' @G@'PG'M? B0>EL<LH'D?  G5B >LHB@>EL<LHH'1?G'G'  GG5H{G'0'? B0>EL<LH' ? 0B >LHBP>EL< LGHHH '>G'G' PGP'`|GG|GHG'`'> B0>EL<LH'>  B >LGHB@>EL<LHH'> G ' G ' pG G{P G p'p G G 5H {pT >|  T ;T>4 oU >G ' '> ;>' B@>EL<LHH'> '> 0B >LHB`>EL< LGHGHHH 'k> G ' G ' pG G| G p'` |G HT >| T+;T#>4oU>GG p'p  `'G '<> PT->| T ;T0>4oU">GP'PB@>EL< LHH@'>G'G'  T<| T:T<4oU;GG 0@'=  T<| T:T<4oU<GB0>EL< LH; ; '=  B@>EL< LGHH'=G'G' @G@'PG'= '=B0>EL<LH'= ' G' `TJ<|:G<qUA<G`'` |3T_;| T2:Tb;4oUT;GTG=| T$:TJ=4oU<=GG'  @'p P`p@'G'e=TV=|9S=qUM=G'  B@>EL< LGHH'F= 0B >LGHBP>EL< LGHHH'2= G' G' `GGG`'` |GHG'p'=  | T<|Y9<qU<GB0>EL<LH'= PT<| Tr9T<4oU<GG@'PB@>EL< LHH@'< G ' G ' pT<| T>9T<4oU<GG p'` |T<| T&9T<4oU<GG p' G ' '< PT<|8<qU<GP'P|{P B0>EL<LH'T#;;<B HHB HHB HHB HH$@< PB >LHG|0Z`u+?q &^Aj^ L>p H^p<'D^pB`>EL<LHHHH@'&v<&<< G 'V G G  y T<| T~8T54oUt<GG ' p G 'p G H  | *} 'E T 9|<6 9qU9G~ K tM > >a  r G G '& J<& P<G ' G G G |@} =G Kh| 5Zu0qp. `^ D G G 5 H  G { T <|  T 8Tg54 oU <G p'  G H G ' '& <& <G & +<7<  B@>EL< LGHH'+< PB >LGHB LHBp>EL< LHGHHHH0'< G 'W G G| T48| T7T784oU)8Gp'P G '@ G H|,})ET38|b508qU*8G~`KtM>>arGG ' & o; & t;G ' pG p'` G G~PE||T:| 7:qU:G`P'p |)G GG ~@$T7| T&7T74oU7GG GP'p G HB HHG HG P'G HG G B HHH  'Z; B0>EL<LH'Q; 0B >LHBP>EL< LGHHH '=; G' G' `GG|&GGp'` |}ET^7|4[7qUU7G~@p'G'HG';  | B0>EL<LH':  B >LGHB@>EL<LHH':G'G' 0GGB HH5HG':  | ;:B0>EL<.LH':  T:| T(6T:4oU:G 'T:| T6T:4oU:G':  B@>EL< LGHH': G' G' `Gp`' G': V2;21U2U3UG3U 3U2U2V2 ;21U2U3U2V22V2;21U2T21U2V2V2;21U2T21U2V2;21U2U2V2;21U2U2V22V22Vx32V2;21U2U2V22V22V`32V2;21U2U2V22V22V2;21U2T21U2U2V2;21U2U2V22V22V22V#32V2;21U2U2V22V22V2;21U2T21U2U2U2V2;21U2U2V22V22V22V2;21U2U2V2;21U2U2V22V22V2;21U2U2V22V22V22V2r;21U2U2V22V22V22V22V22V22V22V22V22V2R;21U2T21U2V2I;21U2U24V2D;21U2U#4V2A;21U2U4V2<;21U2U4V27;21U2U3V22;21U2U3V2/;21U2U3V2.;21U2U3V2-;21U2U3V2,;21U2U3V2);21U2U3V2(;21U2U3V2#;21U2U~3V2;21U2Uo3V2;21U2U`3V2;21U2UQ3V2;21U2UB3V2;21U2U33V2 ;21U2U$3V2;21U2U3V2;21U2U3V2;21U2U2V2;21U2U2V2;21U2U2V2;21U2U2V2;21U2U2V2;~21U2U2V2;}21U2U2V2;|21U2U2V2;{21U2U2V2}2V2~2V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V22V2;21U2T21U2V2;21U2U2V2V2V2;21U2V2;21U2V2;21U2V2V2(V231UB3VL3V;G31UK3VU3U;P31UT3V3V;31U3V3V3PV3SV3Z;31U3V3Y;31U3V3XV3];31U3U3V3ZV33V3b;31U3V3e;31U3V3d;31U3V4e;31U4V4b;31U4V4aVR4h;M41UQ4VY4Vt4d;o41Us4V4eV4h;41U4V4i;41U4V4l;41U4V4mV4rV4;41U4UD5U25U4V4x;4U5U4V4w;4U45U"5U4V4x;4U15U4V4;4U5U5V4V54V 5;5U'5U5U 5V5V 55V]5Vf5;a51Ue5Vi5;d51Uh5'srfi'srfi-171'filename'srfi/srfi-171.scm'imports'ice-9'match'srfi-9'srfi-43'select' vector->list'srfi-69'prefix'srfi69:'rnrs' hashtables'rnrs:'meta'exports'rcons' reverse-rcons'rcount'rany'revery'list-transduce'vector-transduce'string-transduce'bytevector-u8-transduce'port-transduce'generator-transduce'tmap'tfilter'tremove'treplace' tfilter-map'tdrop' tdrop-while'ttake' ttake-while' tconcatenate' tappend-map'tdelete-neighbor-duplicates'tdelete-duplicates'tflatten'tsegment' tpartition' tadd-between' tenumerate'tlog' declarative?'guile'define-module*'set-current-module'cond-expand-provide'nothing'nothing?' make-replacer'reverse!' 'wrong-type-arg'allocate-struct'*Expected vtable with no unboxed fields: ~A'wrong-number-of-args'2Wrong number of initializers when instantiating ~A'8Wrong type argument in position 1 (expecting vtable): ~S'8Wrong type argument in position 1 (expecting struct): ~S' list-reduce' vector-reduce' string-reduce'bytevector-u8-reduce' port-reduce'generator-reduce'compose'list?'srfi-69:hash-table'rnrs:hashtable?' hash-table?' procedure?' misc-error'"Unsupported mapping in treplace ~S'srfi69:hash-table-ref/default'hash-ref'rnrs:hashtable-ref'assoc' match-error'no matching pattern'ensure-reduced'preserving-reduced'equal?'srfi69:make-hash-table'srfi69:hash-table-exists?'srfi69:hash-table-set!'integer?'/argument to tsegment must be a positive integer' out-of-range' make-vector'Argument 2 out of range: ~S'?Wrong type argument in position 2 (expecting small integer): ~S'struct-ref/immediate'=Wrong type argument in position 2 (expecting boxed field): ~S' vector-set!'@Wrong type argument in position 1 (expecting mutable vector): ~S'write'newline ,    \   0 h   \  8x$P4<X0 $" ###h%&P''$(T*p*,--.   @ j@ } `` $ $lll-3=Q`a``tz((ppp <  <(<x<xxLR\jq * x8 xU r$$lll| ||,2<<W<g PP P  ((8/8=8TQT\ }\  \ \    !# !!I!<"!!\! "b "<"l<"\"\"" " $""""" $ $$ $`$`$$$%# %%%,%@,%H%FH%%P %(&n (&& &'&&&''''( ()R)d,)))@+ @+d,0 d,, ,,-  ,- 0,-P- P-. !. 0j!! 0\0!\00! 0100"01 "11*"1 2d" 2|2x"|22|22"22"22"2P3"P33"344#44444X4#X4t4#t44(#   $) - 5 :CG L R ` g l s                   G   G    $,4 <(D0L8P@XHtH|HH( **                   , $) (08@D5 5  CG ( )  4PX\x|CG ( )  ( @\dh      , 0 $)  (<DLTX|, 0 $)  (<DLTX|, 0 $)  (<DLTX|, 0 $)  (<DLTX|    $(( $)  ( (<DLTX, 0 $)  (<DLTX|CG (CG (0 ( $CG (CG (0 0 0CG (CG (0 0 0 $) CG (08@DHT`pCG (0 ( $CG (  )) CG $)  $) )CGCGCG 08< T|    $) (08@DH $) (08@DH $) (08@DH $)  555 (08@DH8d (CG (,8DCG (4 ( $CG (CCG (4@L    (CG (CCG  ",8"D"L  0 04DH PCG (CCG $,8D    $)   888<@H\px CG   CCG  ",8"D"L T   $)  04DH Thp x8 $) CG (08@D(\`lx  $)   ( 08<@ $) CG (08@DHT`pCG (0 ( $ CG ( ) $)  $)  (040L`t|   (   @@) 8@DCG (CCG $,8"D"L  80(8@)CG,HPTXdp $) CG (08@DH0`dp|  $)  $)   ( 08<0@8Xl 0H8) CG 5555 08<(Tdp| (C CG  ",0@#T+\"`*d0h"l"|"""""""  $) )  ( < D(L T X8\@xH|8    ""$*"  $)   , 0*4*4*4+D3X\\\dhpx((CG (0CCG $ ,(00<H*T*` $)  )  (<D LTX(p0t ") $)  550 $ ( P(l(t(x8   (  (   (@ ((  CG (CCG  ",8"D"L )  0 @8T\ x    CG(,8DCCG $,8D 5  ( (CG,0<H $)  $)  (08@D`t|CG (0 0$p=\Et3<"\"%{'d, 013 I8 8X\*DX1<H6 <\ T= L ]X n, < HTp<HH<HXlHp$<`l hh`h\ HTp<dd<$h8<t\h <p D!!l"H"p$# D#@#p'$%h%C&''V()*_L-H-.j1<D1h1w2X3\d3x3\844H5p5h%.. . .Guile 3.0.7nothing?rconsreverse-rconsrcountranyreverylist-transducevector-transducestring-transducebytevector-u8-transduceport-transducegenerator-transducetmaptfiltertremovetfilter-mapmake-replacertreplacetdroptdrop-whilettakettake-whiletconcatenatetappend-maptflattentdelete-neighbor-duplicatestdelete-duplicatestsegmenttpartitiontadd-betweentenumeratetlogi srfi/srfi-171.scmice-9/match.upstream.scmsrfi/srfi-69.scmice-9/boot-9.scm |;,a,,,b,,,b,$,;a'w,]hJJ|!~ w w w wzw w wwwzwJhw!w>JBhw w|K [ x Kk \k _[<  i 'L<  i ; [wx> [wx> [wx>'[wx>jywx>#[wx>< Zx[w=< Zx [h Kz< Zx[h Kz<ddh< Zx[w>< -xL Kh+Aw-wh ;th;q,h(x<<<w<$,, BFw Zx[w7;< <xj ,Ly<x ix[ hY>,-y<k <xLi ,-{ [y< xx jJh>,#wV@<i Kx L<h< Zx[w; - L, <+w h?&Z [ ixy hM-z9hi KxL h>;,iy?,;=;,<x " Ki*=)xZ;Zyi,.%.:$-yw>K &=%wi ,Z;x[ }h",!xY-yY<;a>x i yjZi!=-=$hMj <xj< ,-LiZ6;5DYC<< Zx[x 888 p\\X%<H*8<tT1 @ Qp bD z <$Hlp<H`<(HpHp<<xl hhxh\$Hlp<d|<<hP<\h8Tp\  !H!p<" \"@"p $$h%7%(&&J'()Sd,H,,-^ 0<\0h0k1X 2\|2xv2\P33H44p4hnothing?rconsreverse-rconsrcountranyreverylist-transducevector-transducestring-transducebytevector-u8-transduceport-transducegenerator-transducetmaptfiltertremovetfilter-mapmake-replacertreplacetdroptdrop-whilettakettake-whiletconcatenatetappend-maptflattentdelete-neighbor-duplicatestdelete-duplicatestsegmenttpartitiontadd-betweentenumeratetlogclosureargcachevarproctmpmodnameboxnothingpairnothing?tagcoderconsreverse-rconsrcountranyreverylist-transducevector-transducestring-transducebytevector-u8-transduceport-transducegenerator-transducetmaptfiltertremovetfilter-mapmake-replacertreplacetdroptdrop-whilettakettake-whiletconcatenatetappend-maptflattentdelete-neighbor-duplicatestdelete-duplicatestsegmenttpartitiontadd-betweentenumeratetlogvallstcachedxresultinputpredvtableflagsmaskresrfieldsnfieldsptridxbitssxformfcollfalseinitbyportgenreducermapprimtailnnew-nobjunboxeddrop?retftake?equality-pred?issizeausizenwordsvw0-highw0poswordulenrlenslensidxa*res*collectelemsend-elem?log-functionA transducer-friendly consing reducer with '() as identity.A transducer-friendly consing reducer with '() as identity. The resulting list is in reverse order.A counting reducer that counts any elements that made it through the transduction. @example (transduce (tfilter odd?) tcount (list 1 2 3)) @result{} 2 @end exampleReturn a reducer that tests input using @var{pred}. If any input satisfies @var{pred}, return @code{(reduced value)}.Returns a reducer that tests input using @var{pred}. If any input satisfies @var{pred}, it returns @code{(reduced #f)}.Return a transducer that searches for any input in @var{map}, which may be a guile native hashtable, an R6RS hashtable, a srfi-69 hashtable, an alist or a one-argument procedure taking one value and producing either the same value or a replacement one. Alists and guile-native hashtbles compare keys using @code{equal?} whereas the other mappings use whatever equality predicate they were created with.tflatten is a transducer that flattens any list passed through it. @example (list-transduce tflatten conj (list 1 2 (list 3 4 '(5 6) 7 8))) @result{} (1 2 3 4 5 6 7 8) @end exampletdelede-duplicates is a transducer that deletes any subsequent duplicate elements. Comparisons is done using @var{equality-pred?}, which defaults to @code{equal?}.Return a transducer that partitions the input into lists of @var{n} items. If the input stops it flushes any accumulated state, which may be shorter than @var{n}.Return a transducer that partitions any input by whenever @code{(f input)} changes value. Return a transducer that interposes @var{elem} between each value pushed through the transduction.Return a transducer that indexes every value passed through into a cons pair as @code{(index . value)}. Starts at @var{n} which defaults to 0..guile.procprops.rodata.data.rtl-text.guile.frame-maps.dynamic.strtab.symtab.guile.arities.strtab.guile.arities.guile.docstrs.strtab.guile.docstrs.debug_info.debug_abbrev.debug_str.debug_loc.debug_line.shstrtab