GOOF----LE-8-2.0V]4hE] gguile  gdefine-module*   gsrfi gsrfi-41  gfilenameS fsrfi/srfi-41.scm gimportsS gsrfi-1     gsrfi-8   gsrfi-9   ggnu   gsrfi-26   gice-9 gmatch    gexportsS !g stream-null "g stream-cons #gstream? $g stream-null? %g stream-pair? &g stream-car 'g stream-cdr (g stream-lambda )g define-stream *g list->stream +g port->stream ,gstream -g stream->list .g stream-append /g stream-concat 0gstream-constant 1g stream-drop 2gstream-drop-while 3g stream-filter 4g stream-fold 5gstream-for-each 6g stream-from 7gstream-iterate 8g stream-length 9g stream-let :g stream-map ;g stream-match g stream-ref ?gstream-reverse @g stream-scan Ag stream-take Bgstream-take-while Cg stream-unfold Dgstream-unfolds Eg stream-zip F!"#$%&'()*+,-./0123456789:;<=>?@ABCDE% Ggset-current-module HG IG Jgcond-expand-provide Kgcurrent-module L Mgmake-syntax-transformer NM OM Pgmust Qgmacro Rg $sc-dispatch SR TR Ugany Vgeach-any WUV XUW YUX ZUY [UZ \g syntax-object ]glet ^gtop _^ `gribcage agdummy bgpred cgobj dgfunc egmsg fgargs gabcdef hgm-46961e513a-1 ih^ ji_____ kfl-46961e513a-6 lfl-46961e513a-7 mfl-46961e513a-8 nfl-46961e513a-9 ofl-46961e513a-a pfl-46961e513a-b qklmnop r`gjq s` tgx ut vi wfl-46961e513a-3 xw y`uvx z_rsy {ghygiene |{ }\]z| ~gitem \~z| gunless \z|  gthrow \z| gquote \z| gwrong-type-arg \z|  glist \z|   gsyntax-violation   f-source expression failed to match any pattern gmust-not gm-46961e513a-14 ^ _____ fl-46961e513a-19 fl-46961e513a-1a fl-46961e513a-1b fl-46961e513a-1c fl-46961e513a-1d fl-46961e513a-1e  `g  fl-46961e513a-16  `u _s \]| \~| gwhen \|  \| \| \|  \|   g must-every gobjs abdef gm-46961e513a-27 ^ _____ fl-46961e513a-2c fl-46961e513a-2d fl-46961e513a-2e fl-46961e513a-2f fl-46961e513a-30 fl-46961e513a-31  `  fl-46961e513a-29  `u _s \]| gflunk \| gremove \| \| gnull? \|  \| \| \|  \|  g first-value UU greceive gexpr a gm-46961e513a-3a ^ _ fl-46961e513a-3f fl-46961e513a-40  `  fl-46961e513a-3c  `u _s \| gfirst \| g_ \| 挤  g second-value gm-46961e513a-44 ^ _ fl-46961e513a-49 fl-46961e513a-4a  `  fl-46961e513a-46  `u _s \| \| gsecond \| \|    g third-value gm-46961e513a-4e ^ _ fl-46961e513a-53 fl-46961e513a-54  `  fl-46961e513a-50   `u  _s   \ |  \ |  \ | gthird \ | \ |       gdefine-syntax* UU V U g define-syntax gname gbody af gm-46961e513a-57 ^ ___  fl-46961e513a-5c !fl-46961e513a-5d "fl-46961e513a-5e #fl-46961e513a-5f $ !"# %`$ & 'fl-46961e513a-59 (' )`u&( *_%s) +\*| ,glambda* -\,*| .UUU /gsyntax 0a/ 1__ 2fl-46961e513a-66 3fl-46961e513a-67 4fl-46961e513a-68 5234 6`015 7_6s) 8\7| 9gstream-promise :g%make-stream-promise-procedure ;gmake-stream-promise <U =glambda >gm-46961e513a-70 ?>^ @gt-46961e513a-6f A@ B? Cfl-46961e513a-75 DC E`ABD Ffl-46961e513a-72 GF H`uBG Igshift Jg proc-name KJf L__ Mfl-1e8ba8b5a-2ba Nfl-1e8ba8b5a-2bb OMN P`KLO Qgkey Rgvalue Sgformals TQRS U_____ Vfl-1e8ba8b5a-2ad Wfl-1e8ba8b5a-2ae Xfl-1e8ba8b5a-2af Yfl-1e8ba8b5a-2b0 Zfl-1e8ba8b5a-2b1 [VWXYZ \`TU[ ]gmake-procedure-name ^] __ `fl-1e8ba8b5a-29d a` b`^_a c_ dfl-1e8ba8b5a-29c ed f`uce g?EsHIssssP\bf  h{ i\=gh jgval k_EsH l\jk| ml ng make-struct ogm-46961e513a-6d po^ qgt-1e8ba8b5a-38d rgt-1e8ba8b5a-38c sgt-1e8ba8b5a-38b tqrs ugm-1e8ba8b5a-38e vu^ wvvv xfl-1e8ba8b5a-392 yfl-1e8ba8b5a-393 zfl-1e8ba8b5a-394 {xyz |`tw{ }g ctor-args ~} fl-1e8ba8b5a-37a  `~c gctor gfield  fl-1e8ba8b5a-376 fl-1e8ba8b5a-377  `L gform g type-name gconstructor-spec g field-names  ____ fl-1e8ba8b5a-36b fl-1e8ba8b5a-36c fl-1e8ba8b5a-36d fl-1e8ba8b5a-36e  ` g record-layout gfunctional-setters gsetters gcopier ggetters g constructor ggetter-identifiers gfield-identifiers  ________ fl-1e8ba8b5a-343 fl-1e8ba8b5a-341 fl-1e8ba8b5a-33f fl-1e8ba8b5a-33d fl-1e8ba8b5a-33b fl-1e8ba8b5a-339 fl-1e8ba8b5a-337 fl-1e8ba8b5a-335  ` fl-1e8ba8b5a-334  `uc pEsHIs|ssss \nh \9k| \ h l im V   fWrong number of arguments g identifier?   _sH \:| grecord-type-vtable   gpw gdefault-record-printer   j gset-struct-vtable-name!   gvtable-offset-user   g%stream-promise?-procedure gstream-promise? gm-46961e513a-7d ^ gt-46961e513a-7c   fl-46961e513a-82  ` fl-46961e513a-7f  `u sIssssP\bf  \=h gt-1e8ba8b5a-47e gt-1e8ba8b5a-478 gt-1e8ba8b5a-479 gt-1e8ba8b5a-47a gt-1e8ba8b5a-47d gt-1e8ba8b5a-47c gt-1e8ba8b5a-47b  gm-1e8ba8b5a-47f ^  fl-1e8ba8b5a-483 fl-1e8ba8b5a-484 fl-1e8ba8b5a-485 fl-1e8ba8b5a-486 fl-1e8ba8b5a-487 fl-1e8ba8b5a-488 fl-1e8ba8b5a-489  ` g copier-id  fl-1e8ba8b5a-476  `c g ctor-name  fl-1e8ba8b5a-46e  `c  fl-1e8ba8b5a-46c  `c glayout  fl-1e8ba8b5a-46a  `c g immutable?  fl-1e8ba8b5a-468  `c g field-count  fl-1e8ba8b5a-466  `c  g getter-ids     fl-1e8ba8b5a-463     ` c  g field-ids  fl-1e8ba8b5a-460  `c gpredicate-name g field-spec  ______ fl-1e8ba8b5a-453 fl-1e8ba8b5a-454 fl-1e8ba8b5a-455 fl-1e8ba8b5a-456 fl-1e8ba8b5a-457 fl-1e8ba8b5a-458  ` psIsssssssssss s  \ch !  "gand #\"h $gstruct? %\$h &%  'geq? (\'h )g struct-vtable *\)h +*  ,_s -\9,| .(+- /#&. 0!/ 1_s 2\1| 3gthrow-bad-struct 43 53 6gstream-promise-val 7g%stream-promise-val-procedure 8gfree-id 9g %%on-error :gm-46961e513a-89 ;:^ <; =fl-46961e513a-8b >= ?`u<> @;s?IssssP\bf  A\9@h B8A CBU Dg%%type Egt-1e8ba8b5a-3a5 Fgt-1e8ba8b5a-3a6 Ggt-1e8ba8b5a-3a7 Hgt-1e8ba8b5a-3a8 Igt-1e8ba8b5a-3a9 Jgt-1e8ba8b5a-3aa Kgt-1e8ba8b5a-3ab LEFGHIJK Mgm-1e8ba8b5a-3ac NM^ ONNNNNNN Pfl-1e8ba8b5a-3b0 Qfl-1e8ba8b5a-3b1 Rfl-1e8ba8b5a-3b2 Sfl-1e8ba8b5a-3b3 Tfl-1e8ba8b5a-3b4 Ufl-1e8ba8b5a-3b5 Vfl-1e8ba8b5a-3b6 WPQRSTUV X`LOW Yggetter Zgindex [YZ \fl-1e8ba8b5a-3a3 ]fl-1e8ba8b5a-3a4 ^\] _`[L^ `  a___ bfl-1e8ba8b5a-39e cfl-1e8ba8b5a-39f dfl-1e8ba8b5a-3a0 ebcd f``ae gps?IsXsss_sf h\Dgh i8h jCiU kgck lgerr mgs nlm o;; pfl-46961e513a-8e qfl-46961e513a-8f rpq s`nor t;ss?IssssP\bf  u\kth v\th w_ss? x\9w| yvx zy {g%%index |\{gh }8| ~C}U fl-46961e513a-93 fl-46961e513a-94  `no ;s?IssssP\bf  \kh \h s? \ |   g%%copier \gh 8 CU fl-46961e513a-98 fl-46961e513a-99  `no ;s?IssssP\bf  \kh \h g%%stream-promise-set-fields _s? \|   gt-46961e513a-88  fl-46961e513a-9d  `< ;s?IssssP\bf  \=h ps?IsXsss_sf \mh  gif \h \'h \)h  _s? \9|  g struct-ref \h s? \ |  \3h \h \6|     _s? \7| geach  U U U g %%set-fields gcheck? amY gm-46961e513a-a4 ^ pppp fl-46961e513a-a9 fl-46961e513a-aa fl-46961e513a-ab fl-46961e513a-ac fl-46961e513a-ad  `  fl-46961e513a-a6  `u gt-1e8ba8b5a-3c4 gt-1e8ba8b5a-3c6 gt-1e8ba8b5a-3c5  gm-1e8ba8b5a-3c7 ^  fl-1e8ba8b5a-3cb fl-1e8ba8b5a-3cc fl-1e8ba8b5a-3cd  ` fl-1e8ba8b5a-3c1 fl-1e8ba8b5a-3c2 fl-1e8ba8b5a-3c3  ``a psIssss  \h _s \9| \6|  gmap   gstream-promise-val-set! g"%stream-promise-val-set!-procedure UU gm-46961e513a-b8 ^ gt-46961e513a-b6 gt-46961e513a-b7   fl-46961e513a-bd fl-46961e513a-be  `  fl-46961e513a-ba  `u sIssssP\bf  \=h gt-1e8ba8b5a-3e6 gt-1e8ba8b5a-3e7  gm-1e8ba8b5a-3e8 ^  fl-1e8ba8b5a-3ec fl-1e8ba8b5a-3ed  ` gsetter Y  fl-1e8ba8b5a-3e0  fl-1e8ba8b5a-3e1  fl-1e8ba8b5a-3e2       `a  Z fl-1e8ba8b5a-3d7 fl-1e8ba8b5a-3d8  `L g field-specs  fl-1e8ba8b5a-3d3 fl-1e8ba8b5a-3d4  `L psIs ss \mh \jh  \h \'h \)h   !_s "\9!| # " $g struct-set! %\$h &s '\ &| (%' )\3h *\h +\!| ,*+ -), .#(- /. 0_s 1\0| 2g stream-value 3g%make-stream-value-procedure 4gmake-stream-value 5gm-46961e513a-d9 65^ 7gt-46961e513a-d7 8gt-46961e513a-d8 978 :66 ;fl-46961e513a-de `9:= ?6 @fl-46961e513a-db A@ B`u?A C6>sBIssssP\bf  D\=Ch Egtag F_>sB G\EF| Hgproc I\HF| JGI Kgm-46961e513a-d5 LK^ ML>sBIs|ssss N\nMh O\2F| P\ Mh QNOPGI RDJQ S_sB T\3S| Ugpwpw VEH Wg%stream-value?-procedure Xg stream-value? Ygm-46961e513a-e8 ZY^ [gt-46961e513a-e7 \[ ]Z ^fl-46961e513a-ed _^ ``\]_ afl-46961e513a-ea ba c`u]b dZ`scIssssP\bf  e\=dh fL`scIsssssssssss s g\cfh hg i\"fh j\$fh kjg l\'fh m\)fh nmg o_`sc p\2o| qlnp rikq sehr t_sc u\Wt| vgstream-value-tag wg%stream-value-tag-procedure xgm-46961e513a-f4 yx^ zy {fl-46961e513a-f6 |{ }`uz| ~ys}IssssP\bf  \9~h 8 U Ls}IsXsss_sf \Dh 8 U yy fl-46961e513a-f9 fl-46961e513a-fa  `n ys}IssssP\bf  \kh \h _s} \2|   \{h 8 U fl-46961e513a-fe fl-46961e513a-ff  `n ys}IssssP\bf  \kh \h s} \ |   \h 8 U fl-46961e513a-103 fl-46961e513a-104  `n ys}IssssP\bf  \kh \h g%%stream-value-set-fields _s} \|   gt-46961e513a-f3  fl-46961e513a-108  `z ys}IssssP\bf  \=h Ls}IsXsss_sf \mh  \h \'h \)h  _s} \2|  \h s} \ |  \3h \h \v|     _s} \w| gstream-value-proc g%stream-value-proc-procedure gm-46961e513a-10f ^  fl-46961e513a-111  `u sIssssP\bf  \9h 8 U LsIsXsss_sf \Dh 8 U  fl-46961e513a-114 fl-46961e513a-115  `n sIssssP\bf  \kh \h _s \2|   \{h 8 U fl-46961e513a-119 fl-46961e513a-11a  `n sIssssP\bf  \kh \h s \ |   \h 8 U fl-46961e513a-11e fl-46961e513a-11f  `n sIssssP\bf  \kh \h _s \|   gt-46961e513a-10e  fl-46961e513a-123   `   sIssssP\bf   \= h  L sIsXsss_sf  \m h   \ h \' h \) h   _ s \2|  \ h  s \ |   \3 h \ h \|        !_s "\!| #gm-46961e513a-12a $#^ %$LLLL &fl-46961e513a-12f 'fl-46961e513a-130 (fl-46961e513a-131 )fl-46961e513a-132 *fl-46961e513a-133 +&'()* ,`%+ -$ .fl-46961e513a-12c /. 0`u-/ 1L,s0Issss  2\1h 3_,s0 4\23| 5\v3| 6\3| 756 8gstream-value-tag-set! 9g %stream-value-tag-set!-procedure :gm-46961e513a-13e ;:^ <= ?;; @fl-46961e513a-143 Afl-46961e513a-144 B@A C`>?B D; Efl-46961e513a-140 FE G`uDF H;CsGIssssP\bf  I\=Hh JLCsGIs ss K\mJh L\jJh MKL N\Jh O\'Jh P\)Jh QPK R_CsG S\2R| TOQS U\$Jh VCsG W\ V| XUKWL Y\3Jh Z\Jh [\8R| \Z[ ]YK\ ^NTX] _IM^ `_sG a\9`| bgstream-value-proc-set! cg!%stream-value-proc-set!-procedure dgm-46961e513a-14e ed^ fgt-46961e513a-14c ggt-46961e513a-14d hfg iee jfl-46961e513a-153 kfl-46961e513a-154 ljk m`hil ne ofl-46961e513a-150 po q`unp remsqIssssP\bf  s\=rh tLmsqIs ss u\mth v\jth wuv x\th y\'th z\)th {zu |_msq }\2|| ~y{} \$th msq \ | uv \3th \th \b||  u x~ sw _sq \c| g stream-lazy gexp a gm-46961e513a-173 ^ _ fl-46961e513a-178 fl-46961e513a-179  `  fl-46961e513a-175  `u _s \;| \4| \| glazy \|  \=| geager g stream-eager g stream-delay gm-46961e513a-187 ^ _ fl-46961e513a-18c fl-46961e513a-18d  `  fl-46961e513a-189  `u _s \| \| g stream-force gnull g %stream-null g stream-pare g%make-stream-pare-procedure gmake-stream-pare gm-46961e513a-1d9 ^ gt-46961e513a-1d7 gt-46961e513a-1d8   fl-46961e513a-1de fl-46961e513a-1df  `  fl-46961e513a-1db  `u sIssssP\bf  \=h gkar _s \| gkdr \|  gm-46961e513a-1d5 ^ sIs|ssss \nh \| \ h   _s \|  g%stream-pare?-procedure g stream-pare? gm-46961e513a-1e8 ^ gt-46961e513a-1e7   fl-46961e513a-1ed  ` fl-46961e513a-1ea  `u sIssssP\bf  \=h sIsssssssssss s \ch  \"h \$h  \'h \)h  _s \|    _s \| g stream-kar g%stream-kar-procedure gm-46961e513a-1f4 ^  fl-46961e513a-1f6  `u sIssssP\bf  \9h 8 U sIsXsss_sf \Dh 8 U    fl-46961e513a-1f9  fl-46961e513a-1fa      `n    sIssssP\bf  \kh \h _ s \|   \{h 8 U fl-46961e513a-1fe fl-46961e513a-1ff  `n  sIssssP\bf  \kh \h s  \ | !  "! #\h $8# %$U &fl-46961e513a-203 'fl-46961e513a-204 (&' )`n ( *)sIssssP\bf  +\k*h ,\*h -g%%stream-pare-set-fields ._)s /\-.| 0,/ 10 2gt-46961e513a-1f3 32 4fl-46961e513a-208 54 6`35 76sIssssP\bf  8\=7h 96sIsXsss_sf :\m9h ;: <\9h =\'9h >\)9h ?>: @_6s A\@| B=?A C\9h D6s E\ D| FC:E G\39h H\9h I\@| JHI KG:J L<BFK M8;L N_s O\N| Pg stream-kdr Qg%stream-kdr-procedure Rgm-46961e513a-20f SR^ TS Ufl-46961e513a-211 VU W`uTV XSsWIssssP\bf  Y\9Xh Z8Y [ZU \sWIsXsss_sf ]\D\h ^8] _[^U `SS afl-46961e513a-214 bfl-46961e513a-215 cab d`n`c eSdsWIssssP\bf  f\keh g\eh h_dsW i\h| jgi kj l\{\h m8l n[mU ofl-46961e513a-219 pfl-46961e513a-21a qop r`n`q sSrsWIssssP\bf  t\ksh u\sh vrsW w\ v| xuw yx z\\h {8z |[{U }fl-46961e513a-21e ~fl-46961e513a-21f }~ `n` SsWIssssP\bf  \kh \h _sW \-|   gt-46961e513a-20e  fl-46961e513a-223  `T SsWIssssP\bf  \=h sWIsXsss_sf \mh  \h \'h \)h  _sW \|  \h sW \ |  \3h \h \P|     _sW \Q| gm-46961e513a-22a ^  fl-46961e513a-22f fl-46961e513a-230 fl-46961e513a-231 fl-46961e513a-232 fl-46961e513a-233  `  fl-46961e513a-22c  `u sIssss  \h _s \| \| \P|  gstrm ac gm-46961e513a-259 ^ __ fl-46961e513a-25e fl-46961e513a-25f fl-46961e513a-260  `  fl-46961e513a-25b  `u _s \| \| \| \| f non-stream f null stream gbody0 gbody1 aS gm-46961e513a-28d ^ ___ fl-46961e513a-292 fl-46961e513a-293 fl-46961e513a-294 fl-46961e513a-295  `  fl-46961e513a-28f  `u _s \=| \| gbegin \| gon-eagerS   gon-lazyS    gstream-promise-visit gset-record-type-printer! gdisplay f# W U gdefine gformal a gm-46961e513a-2cf ^ ____ fl-46961e513a-2d4 fl-46961e513a-2d5 fl-46961e513a-2d6 fl-46961e513a-2d7 fl-46961e513a-2d8  `  fl-46961e513a-2d1  `u _s \| \(| W U  U  gletrec  gbody2  aEj   gm-46961e513a-2e0  ^ _____ fl-46961e513a-2e5 fl-46961e513a-2e6 fl-46961e513a-2e7 fl-46961e513a-2e8 fl-46961e513a-2e9 fl-46961e513a-2ea  `   fl-46961e513a-2e2  `u _s \ | \(| g proper-list?  gcircular-list? !fnon-list argument "gcurrent-input-port #g input-port? $fnon-input-port argument %g read-char &g eof-object? 'U (a )gm-46961e513a-359 *)^ +* ,fl-46961e513a-35e -, .`(+- /fl-46961e513a-35b 0/ 1`u+0 2_.s1 3\!2| 4gy 5at4 6*__ 7fl-46961e513a-361 8fl-46961e513a-362 9fl-46961e513a-363 :789 ;`56: <_;s1 =\"<| >\,<| ?g% stream-fold-aux-procedure @gstream-fold-aux AUUUU Bgsyntax-parameterize Cgm-46961e513a-36c DC^ Egt-46961e513a-368 Fgt-46961e513a-369 Ggt-46961e513a-36a Hgt-46961e513a-36b IEFGH JDDDD Kfl-46961e513a-371 Lfl-46961e513a-372 Mfl-46961e513a-373 Nfl-46961e513a-374 OKLMN P`IJO QD Rfl-46961e513a-36e SR T`uQS Ufl-bde397a-1eaf Vfl-bde397a-1eb0 WUV X`KLW YS Zfl-bde397a-1ea6 [fl-bde397a-1ea7 \fl-bde397a-1ea8 ]Z[\ ^`Ya] _gprefix `]_ a__ bfl-bde397a-1e9a cfl-bde397a-1e98 dbc e``ad ffl-bde397a-1e97 gf h`ucg iDPsTIssssX^eh  j{ k\Bij l_PsT m\@l| ngidentifier-syntax o\nij p\?l| qop rmq sr t\=ij u\Hl| vgbase w\vl| x\l| yglimit z\yl| {uwxz |gdo }\|l| ~\jl| \"l| \&l| x u~ u ~w \'l| x xx g1- \l| z z zz  gor \l| gzero? \l| z z \$l| x  gvalues \l| ~xz  } t{ ks   _sT \?| fnon-stream argument ginteger? fnon-integer count gexact? f inexact count fnegative count greverse! gxcons f!non-stream object in input stream g circular-list g stream-do U  WV   fl-46961e513a-478  `uc gvar-step gend  fl-46961e513a-475 fl-46961e513a-473  `a fl-46961e513a-472  `uc _s \| \|  gresult  fl-46961e513a-47f  `c _s \| fbad step expression UV gstep  fl-46961e513a-49c fl-46961e513a-49d  `L gvar ginit gtest  fl-46961e513a-48d fl-46961e513a-48e fl-46961e513a-48f fl-46961e513a-490 fl-46961e513a-491 fl-46961e513a-492  ` _s \9| gloop \| \| \| gappend   fnon-integer argument finexact argument fnegative argument g procedure? fnon-procedural argument gapply gnumber? fnon-numeric starting number fnon-numeric step size g? fl-46961e513a-6c1  `uc g make-guarded g make-matcher  fl-46961e513a-6be fl-46961e513a-6bc  `a fl-46961e513a-6bb  `uc _s \| \$|  gnext  fl-46961e513a-6d4  `c grest   fl-46961e513a-6ce  fl-46961e513a-6cf      `L   _s s \ | gnegate \ | \$ |  g= \ | \& | \' |  U  ggenerate-temporaries ' U gguard gfail   fl-46961e513a-6df !fl-46961e513a-6e0 "fl-46961e513a-6e1 # !" $`a# %t &fl-46961e513a-6d8 'fl-46961e513a-6d9 (&' )`%L( *_$s) +\*| ,VV -gmatcher .- /fl-46961e513a-6f5 0fl-46961e513a-6f6 1/0 2`.L1 3 4fl-46961e513a-6f0 54 6`3c5 7g strm-expr 8gpat 978 :fl-46961e513a-6e7 ;fl-46961e513a-6e8 `9a= ?_s2ss6>  @\]?| A\?| B\P?| C\#?| D\?| E\;?| FDE G\?| HBCAFG I\?| Jg=> K\J?| Lg stream-of-aux Ma Ngm-46961e513a-701 ON^ PO__ Qfl-46961e513a-706 Rfl-46961e513a-707 Sfl-46961e513a-708 TQRS U`MPT VO Wfl-46961e513a-703 XW Y`uVX Z_UsY [\LZ| \\!Z| ]av ^gm-46961e513a-70d _^^ `___ afl-46961e513a-712 bfl-46961e513a-713 cfl-46961e513a-714 dabc e`]`d f_ gfl-46961e513a-70f hg i`ufh j_esi k\"j| lgin m_si n\lm| o8n pUoU qpV rUq sUr tUs uav, v______ wfl-46961e513a-719 xfl-46961e513a-71a yfl-46961e513a-71b zfl-46961e513a-71c {fl-46961e513a-71d |fl-46961e513a-71e }wxyz{| ~`uv} _~si \9| grecur \| \| \| \$|  \]| \&|   \L| \'|   gis \m| 8 UU V U U U av fl-46961e513a-727 fl-46961e513a-728 fl-46961e513a-729 fl-46961e513a-72a fl-46961e513a-72b fl-46961e513a-72c  `v _si \]| \L| gpred? av _____ fl-46961e513a-735 fl-46961e513a-736 fl-46961e513a-737 fl-46961e513a-738 fl-46961e513a-739  ` _si \| \L| fnon-numeric ending number g< g> fbeyond end of stream fnon-procedural mapper fnon-procedural pred? fnon-procedural generator g list->vector gerror   fno matching pattern g list-tabulate g vector-lengthC5h]4    F54I>"G4Ji4Ki5L>"G4OPQT[} h0]C}gdummy  0gpred  0gobj   0gfunc   0gmsg   0gargs   0  0 Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm .   " g macro-typeg syntax-rulesgpatternsgpredgobjgfuncgmsggargsg...C5PR4OQT[ h0]C}gdummy  0gpred  0gobj   0gfunc   0gmsg   0gargs   0  0 Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm 3   " g macro-typeg syntax-rulesgpatternsgpredgobjgfuncgmsggargsg...C5R4OQT[ h8] C~gdummy  4gpred  4gobjs   4gfunc   4gmsg   4gargs   4  4 Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm 8   " g macro-typeg syntax-rulesgpatternsgpredgobjsgfuncgmsggargsg...C5R4OQTh?]C7gdummy  gexpr     Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm =   " g macro-typeg syntax-rulesgpatternsgexprC5R4OQTh?]C7gdummy  gexpr     Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm A   " g macro-typeg syntax-rulesgpatternsgexprC5R4OQT h?]C7gdummy  gexpr     Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm E   " g macro-typeg syntax-rulesgpatternsgexprC5R4OQT+-hc]C[gdummy  gname  gargs   gbody      C.8hS]CKgdummy  gname  gsyntax     Ch@]45$@45$@6gx  9gtmp 9gtmp  " 9gfilenamefsrfi/srfi-41.scm J   9 g macro-typeg syntax-rulesgpatternsgnamegargsgbodyg...gnamegsyntaxC5R9h]Cwgval  gfilenamefsrfi/srfi-41.scm q   gnameg%make-stream-promise-procedureC:R4O;QT<h7]C/gt-46961e513a-6f    C;hS]L6Kga  gfilenamefsrfi/srfi-41.scm  q   ChC]L6;gfilenamefsrfi/srfi-41.scm  q    Ch]C   C hp]45$@45$ O@45$4O?$@  6  6|gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-41.scm q   n C5;R9¨49>"G Ȗ:i9R9h{]$CCsgobj  gfilenamefsrfi/srfi-41.scm q    gnameg%stream-promise?-procedureCR4OQT<0h7]C/gt-46961e513a-7c    ChS]L6Kga  gfilenamefsrfi/srfi-41.scm  q   ChC]L6;gfilenamefsrfi/srfi-41.scm  q    C2h]C   C hp]45$@45$ O@45$4O?$@  6  6|gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-41.scm q   n C5R956h|]& C6tgs  gfilenamefsrfi/srfi-41.scm q    gnameg%stream-promise-val-procedureC7R4O6QTjuzh:]C2gerr  gs    C~h:]C2gerr  gs    Ch:]C2gerr  gs    C<h7]C/gt-46961e513a-88    C6hS]L6Kga  gfilenamefsrfi/srfi-41.scm  q   ChC]L6;gfilenamefsrfi/srfi-41.scm  q    Ch]C   Ch]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefsrfi/srfi-41.scm q   C56R4OQTh v]45Cngdummy  gcheck?  gs   ggetter   gexpr      Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm q   " g macro-typeg syntax-rulesgpatternsgcheck?gsggettergexprg...C5R95h ]& C6gs  gval  gfilenamefsrfi/srfi-41.scm q    gnameg"%stream-promise-val-set!-procedureCR4OQT/hT]CLgt-46961e513a-b6  gt-46961e513a-b7    ChS]L6Kga  gfilenamefsrfi/srfi-41.scm  q   ChC]L6;gfilenamefsrfi/srfi-41.scm  q    C1h]C   C hp]45$@45$ O@45$4O?$@  6  6|gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-41.scm q   n C5R2h]Cgtag  gproc  gfilenamefsrfi/srfi-41.scm t   gnameg%make-stream-value-procedureC3R4O4QTRhT]CLgt-46961e513a-d7  gt-46961e513a-d8    C4hS]L6Kga  gfilenamefsrfi/srfi-41.scm  t   ChC]L6;gfilenamefsrfi/srfi-41.scm  t    CTh]C   C hp]45$@45$ O@45$4O?$@  6  6|gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-41.scm t   n C54RU2V42>"G Ȗ3i2R2hy]$CCqgobj  gfilenamefsrfi/srfi-41.scm t    gnameg%stream-value?-procedureCWR4OXQT<sh7]C/gt-46961e513a-e7    CXhS]L6Kga  gfilenamefsrfi/srfi-41.scm  t   ChC]L6;gfilenamefsrfi/srfi-41.scm  t    Cuh]C   C hp]45$@45$ O@45$4O?$@  6  6|gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-41.scm t   n C5XR25vhz]& C6rgs  gfilenamefsrfi/srfi-41.scm t    gnameg%stream-value-tag-procedureCwR4OvQTh:]C2gerr  gs    Ch:]C2gerr  gs    Ch:]C2gerr  gs    C<h7]C/gt-46961e513a-f3    CvhS]L6Kga  gfilenamefsrfi/srfi-41.scm  t   ChC]L6;gfilenamefsrfi/srfi-41.scm  t    Ch]C   Ch]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefsrfi/srfi-41.scm t   C5vR25h{]& C6sgs  gfilenamefsrfi/srfi-41.scm t    gnameg%stream-value-proc-procedureCR4OQTh:]C2gerr  gs    Ch:]C2gerr  gs    Ch:]C2gerr  gs    C< h8]C0gt-46961e513a-10e    ChS]L6Kga  gfilenamefsrfi/srfi-41.scm  t   ChC]L6;gfilenamefsrfi/srfi-41.scm  t    C"h]C   Ch]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefsrfi/srfi-41.scm t   C5R4OQT247h v]45Cngdummy  gcheck?  gs   ggetter   gexpr      Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm t   " g macro-typeg syntax-rulesgpatternsgcheck?gsggettergexprg...C5R258h ]& C6gs  gval  gfilenamefsrfi/srfi-41.scm t    gnameg %stream-value-tag-set!-procedureC9R4O8QT_hV]CNgt-46961e513a-13c  gt-46961e513a-13d    C8hS]L6Kga  gfilenamefsrfi/srfi-41.scm  t   ChC]L6;gfilenamefsrfi/srfi-41.scm  t    Cah]C   C hp]45$@45$ O@45$4O?$@  6  6|gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-41.scm t   n C58R25bh ]& C6gs  gval  gfilenamefsrfi/srfi-41.scm t    gnameg!%stream-value-proc-set!-procedureCcR4ObQThV]CNgt-46961e513a-14c  gt-46961e513a-14d    CbhS]L6Kga  gfilenamefsrfi/srfi-41.scm  t   ChC]L6;gfilenamefsrfi/srfi-41.scm  t    Ch]C   C hp]45$@45$ O@45$4O?$@  6  6|gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-41.scm t   n C5bR4OQTh>]C6gdummy  gexp     Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm x   " g macro-typeg syntax-rulesgpatternsgexpC5R29h] Cgx  gval gfilenamefsrfi/srfi-41.scm {  | * |  |    gnameg stream-eagerCR4OQTh>]C6gdummy  gexp     Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm ~   " g macro-typeg syntax-rulesgpatternsgexpC5R9562v8b h])& " 45& " 45$& C6$Y4& " 455& " 45& " 45&"& " 45& " 45&  "4 >"G& " 45& " 45&  "4 >"G&  "4 >"G 6Cgpromise  gcontent  gkey  8 gpromise*   gcontent  gs  gval  'gs  A `gval  `  gfilenamefsrfi/srfi-41.scm     ! 8  F  b  c    ;  E 3  * G A 4 `        gnameg stream-forceCRi#R,R4ii5!R9h(]$& 45CCCgobj  !gfilenamefsrfi/srfi-41.scm         ! gnameg stream-null?C$Rh]Cgkar  gkdr  gfilenamefsrfi/srfi-41.scm   gnameg%make-stream-pare-procedureCR4OQThV]CNgt-46961e513a-1d7  gt-46961e513a-1d8    ChT]L6Lga  gfilenamefsrfi/srfi-41.scm    ChD]L6<gfilenamefsrfi/srfi-41.scm     Ch]C   C hp]45$@45$ O@45$4O?$@  6  6}gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-41.scm   n C5RU٨4>"G ȖiRhy]$CCqgobj  gfilenamefsrfi/srfi-41.scm    gnameg%stream-pare?-procedureCR4OQT<h8]C0gt-46961e513a-1e7    ChT]L6Lga  gfilenamefsrfi/srfi-41.scm    ChD]L6<gfilenamefsrfi/srfi-41.scm     Ch]C   C hp]45$@45$ O@45$4O?$@  6  6}gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-41.scm   n C5R5hu]& C6mgs  gfilenamefsrfi/srfi-41.scm    gnameg%stream-kar-procedureCR4OQTh:]C2gerr  gs    C"h:]C2gerr  gs    C%+1h:]C2gerr  gs    C<Mh8]C0gt-46961e513a-1f3    ChT]L6Lga  gfilenamefsrfi/srfi-41.scm    ChD]L6<gfilenamefsrfi/srfi-41.scm     COh]C   Ch]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefsrfi/srfi-41.scm   C5R5Phu]& C6mgs  gfilenamefsrfi/srfi-41.scm    gnameg%stream-kdr-procedureCQR4OPQT_fkh:]C2gerr  gs    Cntyh:]C2gerr  gs    C|h:]C2gerr  gs    C<h8]C0gt-46961e513a-20e    CPhT]L6Lga  gfilenamefsrfi/srfi-41.scm    ChD]L6<gfilenamefsrfi/srfi-41.scm     Ch]C   Ch]145$@45$@45$@45$ @4 5$  O@4 5$4 O?$@66gx  gtmp gtmp  " gtmp  9 gtmp  P gtmp  g gtmp  gfilenamefsrfi/srfi-41.scm   C5PR4O-QTh v]45Cngdummy  gcheck?  gs   ggetter   gexpr      Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm   " g macro-typeg syntax-rulesgpatternsgcheck?gsggettergexprg...C5-R9h0] $$&45$CCCCgobj  /gobj  +gfilenamefsrfi/srfi-41.scm      +    / gnameg stream-pair?C%R4O"QT.h P]CHgdummy  gobj  gstrm      Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm   " g macro-typeg syntax-rulesgpatternsgobjgstrmC5"R#& h] 45$"4>"G45""4>"'G" $&"""" 6gstrm  gpare 6 gfilenamefsrfi/srfi-41.scm      !   0  6  =  C  E ( H     gnameg stream-carC&R#' h] 45$"4>"G45""4>"'G" $&"""" Cgstrm  gpare 6 gfilenamefsrfi/srfi-41.scm      !   0  6  =  C  E ( H    gnameg stream-cdrC'R4O(QTYhh]C`gdummy  gformals  gbody0   gbody1      Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm   " g macro-typeg syntax-rulesgpatternsgformalsgbody0gbody1g...C5(R9562v h@-/03##H& " 45KJ&J " 4J5$J&J " 4J56 $J&J " 4J56C8gpromise  gon-eager  gon-lazy   gcontent  & gkey  ^ gfilenamefsrfi/srfi-41.scm +  G  ^  n      gon-eagerS gon-lazyS gnamegstream-promise-visitCR4i9i5hc]L6[gt-46961e513a-2c2  gfilenamefsrfi/srfi-41.scm )  Ch]]?L6Ug_  gfilenamefsrfi/srfi-41.scm ) 5  CP h]&>L64 L>"G4& " 45LO  LO>"GL& " 4 56gpare  gfilenamefsrfi/srfi-41.scm       '  , 2 Z  g "   Chf]L6^g_  gfilenamefsrfi/srfi-41.scm   '   Ch q]LLOLO6igstrm  gfilenamefsrfi/srfi-41.scm      gnamegloopCh0] 4>"GOQ6gstrm  ,gport  ,gloop   ,gfilenamefsrfi/srfi-41.scm          , C>"G4O)QThy]Cqgdummy  gname  gformal   gbody0   gbody1      Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm   " g macro-typeg syntax-rulesgpatternsgnamegformalgbody0gbody1g...C5)R4O9QT h ]Cgdummy  gtag  gname   gval   gbody1   gbody2     Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm   " g macro-typeg syntax-rulesgpatternsgtaggnamegvalg...gbody1gbody2g...C59R *!2!2hV]L6Ngfilenamefsrfi/srfi-41.scm      C9hV]LL6Ngfilenamefsrfi/srfi-41.scm   '   C hX]L(CLOLLO6gval  'gval 7 Cgkar C Vgkdr C Vgfilenamefsrfi/srfi-41.scm       X C9h y] LOCqgobjs  gval  gfilenamefsrfi/srfi-41.scm    gnamegrecurCh`] 45$"45$"4>"GOQ6gobjs  \gt grecur N Xgfilenamefsrfi/srfi-41.scm      $  /  1 ! 4  N   \ gnameg list->streamC*R"#+$2%&!2hD]L6<gfilenamefsrfi/srfi-41.scm    C9hM]L6Egfilenamefsrfi/srfi-41.scm     C hh]4L545$CO LO 6gc dgval ) 5gval C Ogkar O bgkdr  O bgfilenamefsrfi/srfi-41.scm         d C9h h]LLOC`gval  gfilenamefsrfi/srfi-41.scm    gnamegrecurCh`-.,3#4545$"4>"GOQ6gport ]grecur O [gfilenamefsrfi/srfi-41.scm  (   /  1 ' 4  O  ] gnameg port->streamC+R4O,QT'3h-]C%gdummy     CX=>hK]CCgdummy  gx  gy      Ch@]45$@45$@6gx  9gtmp 9gtmp  " 9gfilenamefsrfi/srfi-41.scm   9 g macro-typeg syntax-rulesgpatternsgxgyg...C5,R$&'h]$"j$ "$"45$D$4455"45$"""~gproc  gbase  gstrm   glimit   gval   pgstrm   pglimit   pgt   ,gfilenamefsrfi/srfi-41.scm       # % 0  8  >  ?  D % L  R  ^  a  p   gnameg% stream-fold-aux-procedureC?R4O@QTAh]Cgt-46961e513a-368  gt-46961e513a-369  gt-46961e513a-36a   gt-46961e513a-36b      C@hT]L6Lga  gfilenamefsrfi/srfi-41.scm    ChD]L6<gfilenamefsrfi/srfi-41.scm     Ch]C   C hp]45$@45$ O@45$4O?$@  6  6}gx  ngtmp ngtmp  " ngtmp  > ngfilenamefsrfi/srfi-41.scm   n C5@R-#-$&'hh) 36]*45$"4>"G$45$"4>"G4 5$"4 >"G $"4 >"G""  "n$ "$"45$  "H$4455"45$""" G6gstrm gn  fgstrm  fgproc  Tgval  Egstrm  Eglimit  Egt  gfirst  U dg_  U d gfilenamefsrfi/srfi-41.scm       (  * % -  E  F  [  ] % `  s   #    *   F 2 T  X  f     f gnameg stream->listC-R#.!$2&hV]4L56Ngfilenamefsrfi/srfi-41.scm         C9'hh]L4L5L6`gfilenamefsrfi/srfi-41.scm     (   :   "      C hx]L(CL45$LL6OLLO 6gstrm  qgval 2 >gval P \gkar \ ogkdr  \ ogfilenamefsrfi/srfi-41.scm                 ) "  " (    q C29h(] OLQCgstrms  (gproc gval  (gfilenamefsrfi/srfi-41.scm   ( gnamegrecurChX-1345("4>"GOQ6gstrms Rgflunk  <grecur D Ngfilenamefsrfi/srfi-41.scm  %  ' + *  D  R gnameg stream-appendC.R#/$!&#/'2&hV]4L56Ngfilenamefsrfi/srfi-41.scm         C92'hV]4L56Ngfilenamefsrfi/srfi-41.scm  "   /  "  C9'hM]L6Egfilenamefsrfi/srfi-41.scm  "   /   ChX]L4LOLO56gval  !gval / ;gkar ; Ngkdr ; Ngfilenamefsrfi/srfi-41.scm     " R    R Ch]4L5$C4L545$"4>"G45$ L4 L56    O  LLO6 gstrm  gval l xgval gkar gkdr  gfilenamefsrfi/srfi-41.scm                /   1  , 4  G   Q  T  ) \  " b    C29h(] OLQCgstrms  (gproc gval  (gfilenamefsrfi/srfi-41.scm    ( gnamegrecurChH] 45$"4>"GOQ6gstrms  Egrecur 7 Agfilenamefsrfi/srfi-41.scm          %    7    E gnameg stream-concatC/R!*h )3C-134?6gobjs  gfilenamefsrfi/srfi-41.scm          gnamegstream-constantC0R4OQTTh]C   C'h.]C&gresult     CVh.]C&gresult     CTh]LC   C'h)]C!ge     Ch@]45$ O@45$@L6gv  @gs  @gtmp  @gtmp  & @gfilenamefsrfi/srfi-41.scm   8   :  & @    @ gnamegvar-stepCh0@]4LL5L4L5C8gresult  0gstep  0  0 C h]45$ 4?"H45$ 4?")45$ 4?" 454  LO54 5$ O@6gvar  ginit  gstep   gtest   gresult   gexpr   gtmp  hgtmp  & egtmp  B bgtmp  { gtmp   gfilenamefsrfi/srfi-41.scm i '  { &   Ch(c] 45$ O@6[gx  'gtmp 'gfilenamefsrfi/srfi-41.scm    ' C5R1#$' h0]"45$"4>"G45$"4>"G $"4>"G"4 5$"4 >"G"V$ "$"4 5$  "04 5$""" GCgn  )gstrm  )gval   gstrm   glimit   gt  gfirst   )gsecond   )g_   ) gfilenamefsrfi/srfi-41.scm .  /   /   /  /  0 0  E 0  G 0  J 0  _ 1  k 1  m 1 % p 1  2  2  2 " 2  3   3   ) gnameg stream-dropC1R2#2$&'h8]4L5$" 4L4L55$LCL4L56gt &gfilenamefsrfi/srfi-41.scm 8   9  9   9 +  9 2 " 9 + # 9 & * 8  0 8  8 8   8 C9h x] LLOCpgstrm  gval  gfilenamefsrfi/srfi-41.scm 8    gnamegloopC hx] 45$"4>"G45$"4>"GOQ6gpred?  ugstrm  ugloop  e qgfilenamefsrfi/srfi-41.scm 5  6   6   6 ,  6  0 7  E 7  G 7 ( J 7  e 8   u gnamegstream-drop-whileC2R3#$!&2&hV]4L56Ngfilenamefsrfi/srfi-41.scm A  A  A   C9'hV]L4L56Ngfilenamefsrfi/srfi-41.scm A  A 1 A *  C' hx]4L5$C4L4L55$MLO LLO 6L4 L56gval 0 <gval L Xgkar X kgkdr X kgfilenamefsrfi/srfi-41.scm >   ? ?   @  @   @ ?  & A p B  x B   x C29h0] OLLQCgstrm  +gproc !gval ! +gfilenamefsrfi/srfi-41.scm >   + gnamegrecurC hx] 45$"4>"G45$"4>"GOQ6gpred?  ugstrm  ugrecur  e qgfilenamefsrfi/srfi-41.scm ;  <   <   < (  <  0 =  E =  G = $ J =  e >   u gnameg stream-filterC3R4#$&' h`]#45$"4>"G45$"4>"G"n$ "$"45$  "H$44 55"4 5$""" GCXgproc  gbase  gstrm   gval  ` gstrm  ` glimit  ` gt  o gfirst  g_   gfilenamefsrfi/srfi-41.scm D  E   E   E %  E  0 F  E F  G F " J F  ` G  G   gnameg stream-foldC4R5#$&'UhXs)345$"4>"G45$"4>"G"145$C44 5>"G4 5""-1345$"4>"G4 5("4>"G"94 5$C4 4 5>"G4 5""kgproc gstrm gstrm  g gproc Ugstrm Ugrest  Ugstrms  Ugflunk  gstrms   M gfilenamefsrfi/srfi-41.scm J  L   L  ! L + $ L  7 M  L M  N M ( Q M  g N  h O r N  u P  x P P  N  N  J  R  R  S  S  S - S  T  T T 1 T   U   V ! U  $ W  ) W  6 W  ? U  M U %  U  gnamegstream-for-eachC5R622hD]L6<gfilenamefsrfi/srfi-41.scm ]    C9hV]LLL6Ngfilenamefsrfi/srfi-41.scm ]  ]  ]   ChX]LOLLLO6gval  gval 0 <gkar < Ogkdr < Ogfilenamefsrfi/srfi-41.scm \   ]   Q C9h z] LLOCrgfirst  gval  gfilenamefsrfi/srfi-41.scm \    gnamegrecurCh-.,3# 45$"4>"G45$"4>"GOQ6gfirst gstep grecur  x gfilenamefsrfi/srfi-41.scm Y  Z  + Z  - Z # 0 Z  C [  X [  Z [ " ] [  x \  gnameg stream-fromC6R722hD]L6<gfilenamefsrfi/srfi-41.scm b    C9hV]L4LL56Ngfilenamefsrfi/srfi-41.scm b   b  b   ChX]LOLLLO6gval  gval 0 <gkar < Ogkdr < Ogfilenamefsrfi/srfi-41.scm a   b   Q C9h y] LLOCqgbase  gval  gfilenamefsrfi/srfi-41.scm a    gnamegrecurChH] 45$"4>"GOQ6gproc  Hgbase  Hgrecur  8 Dgfilenamefsrfi/srfi-41.scm _  `   `   ` (  `  8 a   H gnamegstream-iterateC7R#8$'hJ]!45$"4>"G "V$ "$"45$  "045$"" " GCBgstrm  gval 5 gstrm  5 glimit  5 gt  D [gfirst gsecond  gthird  g_   gfilenamefsrfi/srfi-41.scm d  e   e   e $  e  5 f  f  f   gnameg stream-lengthC8R:#$!2&hh]4L4L556`gfilenamefsrfi/srfi-41.scm o  o   o   o   o    C9'hV]L4L56Ngfilenamefsrfi/srfi-41.scm o  p  p   C h`]4L5$CLLOLLO 6gval " .gval > Jgkar J ]gkdr J ]gfilenamefsrfi/srfi-41.scm m   n n   o   _ C29h0] OLLQCgstrm  +gproc !gval ! +gfilenamefsrfi/srfi-41.scm m   + gnamegrecurCU$!2&hh]4L4L5?6`gfilenamefsrfi/srfi-41.scm w  w   w %  w   w    C9'hV]L4L56Ngfilenamefsrfi/srfi-41.scm w  x  x    C hh]4L5$CLLO LLO 6gval $ 0gval @ Lgkar L _gkdr L _gfilenamefsrfi/srfi-41.scm u   v  v   w   a C29h0] OLLQCgstrms  +gproc !gval ! +gfilenamefsrfi/srfi-41.scm u   + gnamegrecurC h)v345$"4>"G45$"4>"GOQ6-1345$"4>"G4 5("4>"G OQ6gproc |gstrm |grecur  l xgproc gstrm grest  gstrms  gflunk  grecur   gfilenamefsrfi/srfi-41.scm i  k   k  ! k & $ k  7 l  L l  N l # Q l  l m  i  r  r  s  s  s ( s  t  t t , t  u  |    gnameg stream-mapC:R4O;QTh]C   ChX]6Pgrest  gfilenamefsrfi/srfi-41.scm  ~    Ch,]C$grest     Chi]6agvar  grest  gfilenamefsrfi/srfi-41.scm      Ch(] 4L5C{gvar  %grest  %gtmp  %gfilenamefsrfi/srfi-41.scm       % C hp]45$@4?$@45" 6$4?$  LO@""gx  lgtmp lgtmp   lgtmp  9 lgfilenamefsrfi/srfi-41.scm {   l gnameg make-matcherCTTVTh,]C$gexpr     C+hQ]CIgguard  gexpr  gfail      ChH]45$@45$@6gx  Bgfail  Bgtmp  Bgtmp   Bgtmp  + Bgfilenamefsrfi/srfi-41.scm        B gnameg make-guardedCT,@AHIKhz]Crgtmp-46961e513a-6fb  gtmp-46961e513a-6fa  gtmp-46961e513a-6f9      Ch(A]L4L5C9gmatcher  'gexpr  '  ' ChH]4LL54L545$ LO@6gfail  Bgtmp  Bgtmp  $ Bgfilenamefsrfi/srfi-41.scm   $  !     B Ch8]4545$LO@6g strm-expr  6gpat  6gexpr   6gtmp  6gtmp   6gfilenamefsrfi/srfi-41.scm       6 Ch8}]OQ45$ O@6ugx  4g make-matcher 4gtmp   4gfilenamefsrfi/srfi-41.scm z   4 C5;R4O<QTX[\hQ]CIgdummy  gexpr  grest      Ch(] 45$@6gx  "gtmp "gfilenamefsrfi/srfi-41.scm    " g macro-typeg syntax-rulesgpatternsgexprgrestg...C5"G45$"4>"G$145$"4>"G"$"$ "  $"  OQ6gfirst gpast gstep  gstep  glt?  grecur  gfilenamefsrfi/srfi-41.scm     +   -  $ 0   C   X   Z  # ]   u   v      %                    gnameg stream-rangeC=R#>1$&hl] 45$"4>"G45$"4>"G45$"4 >"G $"4 >"G"4 54 5$"4 >"G"6dgstrm  gn  gres  gfilenamefsrfi/srfi-41.scm          !    0   E   G   J   ]   r   t   w        $           +      gnameg stream-refC>R#?2$'2&hV]4L56Ngfilenamefsrfi/srfi-41.scm     ,    C9hD]LC<gfilenamefsrfi/srfi-41.scm     C hh]4L5$LCL4L54LOLO 56gval * 6gval D Pgkar P cgkdr P cgfilenamefsrfi/srfi-41.scm              g    g C9h ] LOCgstrm  grev  gval   gfilenamefsrfi/srfi-41.scm     gnamegloopC!hH] 45$"4>"GOQ6gstrm  Ggloop 7 Agfilenamefsrfi/srfi-41.scm          %    7    G gnamegstream-reverseC?R@#$2hD]L6<gfilenamefsrfi/srfi-41.scm     C9!hD]C<gfilenamefsrfi/srfi-41.scm     ChD]L6<gfilenamefsrfi/srfi-41.scm     C&'h q]L4LL4L554L56igfilenamefsrfi/srfi-41.scm     !  ,   !   !      C h]4L5$FLO6 LO LLLLO6gval  )gval 2 >gkar > Qgkdr > Qgval c ogval gkar gkdr gfilenamefsrfi/srfi-41.scm           Y    C29h0] OLLQCgbase  .gstrm  .gproc  $gval  $ .gfilenamefsrfi/srfi-41.scm    . gnamegrecurC hx] 45$"4>"G45$"4>"GOQ6gproc  wgbase  wgstrm   wgrecur  e qgfilenamefsrfi/srfi-41.scm          %    0   E   G  " J   e    w gnameg stream-scanC@R#A$!2&hV]4L56Ngfilenamefsrfi/srfi-41.scm         C9'h_]LL4L56Wgfilenamefsrfi/srfi-41.scm     .   5   '   C hx]L $"4L5$CLOLLLO 6gt  gval 4 @gval R ^gkar ^ qgkdr ^ qgfilenamefsrfi/srfi-41.scm           !   *    s C29h0] OLQCgn  +gstrm  +gproc  !gval  ! +gfilenamefsrfi/srfi-41.scm    + gnamegrecurC h3] 45$"4>"G45$"4>"G45$"4 >"G $"4 >"G" OQ6+gn  gstrm  grecur  gfilenamefsrfi/srfi-41.scm          "    0   E   G  J   ]   r   t   w        %      gnameg stream-takeCARB#$!&2&hV]4L56Ngfilenamefsrfi/srfi-41.scm        C9'hV]L4L56Ngfilenamefsrfi/srfi-41.scm    1  *  C hp]4L5$C4L4L55$MLO LLO 6Cgval 0 <gval L Xgkar X kgkdr X kgfilenamefsrfi/srfi-41.scm                &    p C29h0] OLLQCgstrm  +gproc !gval ! +gfilenamefsrfi/srfi-41.scm    + gnamegrecurC hx] 45$"4>"G45$"4>"GOQ6gpred?  ugstrm  ugrecur  e qgfilenamefsrfi/srfi-41.scm          ,    0   E   G  ( J   e    u gnamegstream-take-whileCBRC2hV]4LL56Ngfilenamefsrfi/srfi-41.scm         C9hV]L4LL56Ngfilenamefsrfi/srfi-41.scm     *  #  C! hh]4LL5$QLLOLLLO6Cgval  +gval = Igkar I \gkdr I \gfilenamefsrfi/srfi-41.scm            a C29h8] OLLLLQCgbase  1gproc  'gval ' 1gfilenamefsrfi/srfi-41.scm    1 gnamegrecurC h>] 45$"4>"G45$"4>"G45$"4>"GOQ66gmapper  gpred?  g generator   gbase   grecur  gfilenamefsrfi/srfi-41.scm          )    0   E   G  ( J   ]   r   t  , w      gnameg stream-unfoldCCR2hV]4L56Ngfilenamefsrfi/srfi-41.scm         C9hM]LL6Egfilenamefsrfi/srfi-41.scm     (   Chh] 4LL> GOLO6gnext agitems agval  $ 0gval  @ Lgkar  L _gkdr  L _gfilenamefsrfi/srfi-41.scm             a C29h0] OLLQCgseed  +gproc !gval ! +gfilenamefsrfi/srfi-41.scm    + gnameggenerator-streamC&!2'hV]L4L5L6Ngfilenamefsrfi/srfi-41.scm     .      C9.*'hV]L4L5L6Ngfilenamefsrfi/srfi-41.scm     .      ChD]L6<gfilenamefsrfi/srfi-41.scm     C2'hV]L4L5L6Ngfilenamefsrfi/srfi-41.scm     .      C9h _]LLLOCWgval  gfilenamefsrfi/srfi-41.scm        Ch0] H4L5LKJ(CJ&LLLOC"=J$)4J5 LLLO64   J56J$_J(TJ OLLLO6"]"Y(ghead  gval 3 =gval c ogw gval  gval  gkar  gkdr  gfilenamefsrfi/srfi-41.scm            %   D   K  & U   q   r      C29h0] OLQCggenstrm  +gindex  +gproc  !gval  ! +gfilenamefsrfi/srfi-41.scm    + gnamegmake-result-streamCD&hc]LL6[gt-46961e513a-9f4  gfilenamefsrfi/srfi-41.scm  !  C hxA]OOQQ45$"4>"G4544 4 55 O5E9ggen  qgseed  qggenerator-stream   qgmake-result-stream   qggenstrm  S qgfilenamefsrfi/srfi-41.scm    5   7  ' :   M   S   V   Y  ! \  0 d  ! o   q    q gnamegstream-unfoldsCDR#EU$!2&hV]4L56Ngfilenamefsrfi/srfi-41.scm          C9'hV]L4L56Ngfilenamefsrfi/srfi-41.scm    5   .   C h`]4L5$CLO LLO 6gval " .gval > Jgkar J ]gkdr J ]gfilenamefsrfi/srfi-41.scm            _ C29h(] OLQCgstrms  (gproc gval  (gfilenamefsrfi/srfi-41.scm    ( gnamegrecurCh`-1345("4>"GOQ6gstrm Ygrest Ygstrms   Ygflunk   Cgrecur  K Ugfilenamefsrfi/srfi-41.scm           ,   .  * 1   K   Y gnameg stream-zipCERCgm  ,grtd d grtd d grtd A Bgfilenamefsrfi/srfi-41.scm   - * 2 *  : * & ? * q  t 8_ { = = =  = # =  = =  = >~ ?2 Q U V ZT ZU fr jk nb t yw      . - 5  ; [ D ^ I | Y 6 _ ] d  h         n        {  1 } C6