GOOF----LE-8-2.0äU]„4hº,] gguile¤ ¤ gdefine-module*¤ ¤ ¤ grnrs¤ gbase¤ ¤ gfilenameS¤ f rnrs/base.scm¤ gpureS¤ gversionS¤ ¤ gset-current-module¤ ¤ ¤ gresolve-r6rs-interface¤ ¤ ¤ grename¤ gexcept¤ gerror¤ graise¤ gmap¤ gstring-for-each¤ ¤ glog¤ g log-internal¤ ¤ geuclidean-quotient¤ gdiv¤ ¤ !geuclidean-remainder¤ "gmod¤ #!"¤ $g euclidean/¤ %g div-and-mod¤ &$%¤ 'gcentered-quotient¤ (gdiv0¤ )'(¤ *gcentered-remainder¤ +gmod0¤ ,*+¤ -g centered/¤ .g div0-and-mod0¤ /-.¤ 0ginf?¤ 1g infinite?¤ 201¤ 3gexact->inexact¤ 4ginexact¤ 534¤ 6ginexact->exact¤ 7gexact¤ 867¤ 9 #&),/258 ¤ :gcall-with-deferred-observers¤ ;:¤ <:¤ =gmodule-use-interfaces!¤ >=¤ ?=¤ @gcurrent-module¤ A@¤ B@¤ Cgsrfi¤ Dgsrfi-11¤ ECD¤ Fgmodule-export!¤ GF¤ HF¤ Igassert¤ Jgassertion-violation¤ Kgvector-for-each¤ Lg vector-map¤ Mgsymbol=?¤ Ng boolean=?¤ Oginteger-valued?¤ Pgrational-valued?¤ Qg real-valued?¤ RIJKLMNOPQ ¤ Sgmodule-re-export!¤ TS¤ US¤ Vgidentifier-syntax¤ Wg syntax-rules¤ Xg letrec-syntax¤ Yg let-syntax¤ Zgunquote-splicing¤ [gunquote¤ \g quasiquote¤ ]gapply¤ ^gvalues¤ _g dynamic-wind¤ `gcall-with-values¤ agcall/cc¤ bgcall-with-current-continuation¤ cg vector-fill!¤ dg list->vector¤ eg vector->list¤ fg vector-set!¤ gg vector-ref¤ hg vector-length¤ igvector¤ jg make-vector¤ kgvector?¤ lg string-copy¤ mg list->string¤ ng string->list¤ og string-append¤ pg substring¤ qg string>=?¤ rg string<=?¤ sgstring>?¤ tgstring=?¤ {gchar<=?¤ |gchar>?¤ }gcharchar¤ €g char->integer¤ gstring->symbol¤ ‚gsymbol->string¤ ƒgfor-each¤ „glist-ref¤ …g list-tail¤ †greverse¤ ‡gappend¤ ˆglength¤ ‰glist¤ Šglist?¤ ‹gcddddr¤ Œgcdddar¤ gcddadr¤ Žgcdaddr¤ gcadddr¤ gcaddar¤ ‘gcaaddr¤ ’gcadadr¤ “gcdaadr¤ ”gcdadar¤ •gcddaar¤ –gcdaaar¤ —gcadaar¤ ˜gcaadar¤ ™gcaaadr¤ šgcaaaar¤ ›gcdddr¤ œgcddar¤ gcdadr¤ žgcaddr¤ Ÿgcdaar¤  gcadar¤ ¡gcaadr¤ ¢gcaaar¤ £gcddr¤ ¤gcdar¤ ¥gcadr¤ ¦gcaar¤ §gcdr¤ ¨gcar¤ ©gcons¤ ªgstring->number¤ «gnumber->string¤ ¬g>=¤ ­g<=¤ ®g>¤ ¯g<¤ °g=¤ ±gfinite?¤ ²gnan?¤ ³geven?¤ ´godd?¤ µg negative?¤ ¶g positive?¤ ·gzero?¤ ¸ginexact?¤ ¹gexact?¤ ºginteger?¤ »g rational?¤ ¼greal?¤ ½gcomplex?¤ ¾gangle¤ ¿g magnitude¤ Àg make-polar¤ Ágatan¤ Âgacos¤ Ãgasin¤ Ägtan¤ Ågcos¤ Ægsin¤ Çgexp¤ Ègsqrt¤ Égexact-integer-sqrt¤ Êgexpt¤ Ëgmake-rectangular¤ Ìg imag-part¤ Íg real-part¤ Îg rationalize¤ Ïground¤ Ðgtruncate¤ Ñgceiling¤ Ògfloor¤ Óglcm¤ Ôggcd¤ Õg denominator¤ Ög numerator¤ ×gabs¤ Øgmin¤ Ùgmax¤ Úg/¤ Ûg*¤ Üg-¤ Ýg+¤ Þgeq?¤ ßgequal?¤ àgeqv?¤ ágnot¤ âgand¤ ãgor¤ ägcase¤ ågcond¤ ægset!¤ çgif¤ èglambda¤ égquote¤ êgbegin¤ ëgletrec*¤ ìgletrec¤ íg let*-values¤ îg let-values¤ ïglet*¤ ðglet¤ ñg define-syntax¤ ògdefine¤ óg procedure?¤ ôgstring?¤ õgnumber?¤ ögpair?¤ ÷gnull?¤ øgchar?¤ ùgsymbol?¤ úgboolean?¤ ûVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~€‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œžŸ ¡¢£¤¥¦§¨©ª«¬­®¯°471±²³´µ¶·¸¹º»¼½¾¿ÀÁÂÃÄÅÆÇÈÉÊ.+(%"¾ËÌÍÎÏÐÑÒÓÔÕÖ×ØÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðèWñòóôõö÷køùú²¤ ügmodule-replace!¤ ýü¤ þü¤ ÿ¤ f.string arguments must all have the same length¤ g scm-error¤ gwrong-type-arg¤ fmap¤ fCircular list: ~S¤ fNot a list: ~S¤ fList of wrong length: ~S¤ gmake-syntax-transformer¤ ¤  ¤  g define-proxy¤  gmacro¤  g $sc-dispatch¤   ¤  ¤ gany¤ gfree-id¤ g syntax-object¤ g@¤ gtop¤ ¤ gribcage¤ ¤ gx¤ ¤ g m-a850ec-9¤ ¤ ¤ f l-a850ec-b¤ ¤ ¤ ¤  gprivate¤ ! ¤ "!¤ #"¤ $#¤ %$¤ &gdummy¤ 'gbinding¤ (gmodule¤ )goriginal¤ *&'()¤ +¤ ,f l-a850ec-e¤ -f l-a850ec-f¤ .f l-a850ec-10¤ /f l-a850ec-11¤ 0,-./¤ 1*+0¤ 21¤ 3ñ2!¤ 4V2!¤ 5g module-ref¤ 652!¤ 7gresolve-interface¤ 872!¤ 9é2!¤ :gsyntax-violation¤ ;:¤ <:¤ =f-source expression failed to match any pattern¤ >g identifier?¤ ?>¤ @>¤ Ag m-a850ec-16¤ BA¤ Cgid¤ DC¤ Eg m-a850ec-17¤ FE¤ GF¤ Hf l-a850ec-1e¤ IH¤ JDGI¤ Kf l-a850ec-19¤ LK¤ MGL¤ Ngshift¤ OBJMN1¤ P5O!¤ Q7O!¤ RéO!¤ SJM¤ TS!¤ Ug exceptions¤ VUS!¤ WTV¤ XRW¤ YQX¤ ZS!¤ [RZ¤ \PY[¤ ]g_¤ ^geach-any¤ _]^Œ¤ `f l-a850ec-21¤ a`¤ bGa¤ cBbMN1¤ d5c!¤ e7c!¤ féc!¤ gbM¤ hg!¤ iUg!¤ jhi¤ kfj¤ lek¤ mg!¤ nfm¤ odln¤ pg condition¤ qg m-a850ec-24¤ rq¤ sg m-a850ec-25¤ ts¤ ut¤ vf l-a850ec-2c¤ wv¤ xDuw¤ yf l-a850ec-27¤ zy¤ {uz¤ |rx{N1¤ }5|!¤ ~7|!¤ é|!¤ €x{¤ €!¤ ‚g conditions¤ ƒ‚€!¤ „ƒ¤ …„¤ †~…¤ ‡p€!¤ ˆ‡¤ ‰}†ˆ¤ Šf l-a850ec-2f¤ ‹Š¤ Œu‹¤ rŒ{N1¤ Ž5!¤ 7!¤ é!¤ ‘Œ{¤ ’‘!¤ “‚‘!¤ ”’“¤ •”¤ –•¤ —p‘!¤ ˜—¤ ™Ž–˜¤ šg make-error¤ ›g m-a850ec-32¤ œ›¤ g m-a850ec-33¤ ž¤ Ÿž¤  f l-a850ec-3a¤ ¡ ¤ ¢DŸ¡¤ £f l-a850ec-35¤ ¤£¤ ¥Ÿ¤¤ ¦œ¢¥N1¤ §5¦!¤ ¨7¦!¤ ©é¦!¤ ª¢¥¤ «ª!¤ ¬‚ª!¤ ­«¬¤ ®©­¤ ¯¨®¤ °šª!¤ ±©°¤ ²§¯±¤ ³f l-a850ec-3d¤ ´³¤ µŸ´¤ ¶œµ¥N1¤ ·5¶!¤ ¸7¶!¤ ¹é¶!¤ ºµ¥¤ »º!¤ ¼‚º!¤ ½»¼¤ ¾¹½¤ ¿¸¾¤ Àšº!¤ Á¹À¤ ·¿Á¤ Ãgmake-assertion-violation¤ Äg m-a850ec-40¤ ÅĤ Æg m-a850ec-41¤ ÇƤ ÈǤ Éf l-a850ec-48¤ Êɤ ËDÈʤ Ìf l-a850ec-43¤ Í̤ ÎÈͤ ÏÅËÎN1¤ Ð5Ï!¤ Ñ7Ï!¤ ÒéÏ!¤ ÓËΤ ÔÓ!¤ Õ‚Ó!¤ ÖÔÕ¤ ×ÒÖ¤ ØÑפ ÙÃÓ!¤ ÚÒÙ¤ ÛÐØÚ¤ Üf l-a850ec-4b¤ Ýܤ ÞÈݤ ßÅÞÎN1¤ à5ß!¤ á7ß!¤ âéß!¤ ãÞΤ äã!¤ å‚ã!¤ æäå¤ çâæ¤ èáç¤ éÃã!¤ êâé¤ ëàèê¤ ìgmake-who-condition¤ íg m-a850ec-4e¤ îí¤ ïg m-a850ec-4f¤ ðï¤ ñð¤ òf l-a850ec-56¤ óò¤ ôDñó¤ õf l-a850ec-51¤ öõ¤ ÷ñö¤ øîô÷N1¤ ù5ø!¤ ú7ø!¤ ûéø!¤ üô÷¤ ýü!¤ þ‚ü!¤ ÿýþ¤ ûÿ¤ ú¤ ìü!¤ û¤ ù¤ f l-a850ec-59¤ ¤ ñ¤ î÷N1¤  5!¤  7!¤  é!¤  ÷¤   !¤ ‚ !¤  ¤  ¤  ¤ ì !¤  ¤  ¤ gmake-message-condition¤ g m-a850ec-5c¤ ¤ g m-a850ec-5d¤ ¤ ¤ f l-a850ec-64¤ ¤ D¤ f l-a850ec-5f¤ ¤  ¤ ! N1¤ "5!!¤ #7!!¤ $é!!¤ % ¤ &%!¤ '‚%!¤ (&'¤ )$(¤ *#)¤ +%!¤ ,$+¤ -"*,¤ .f l-a850ec-67¤ /.¤ 0/¤ 10 N1¤ 251!¤ 371!¤ 4é1!¤ 50 ¤ 65!¤ 7‚5!¤ 867¤ 948¤ :39¤ ;5!¤ <4;¤ =2:<¤ >gmake-irritants-condition¤ ?g m-a850ec-6a¤ @?¤ Ag m-a850ec-6b¤ BA¤ CB¤ Df l-a850ec-72¤ ED¤ FDCE¤ Gf l-a850ec-6d¤ HG¤ ICH¤ J@FIN1¤ K5J!¤ L7J!¤ MéJ!¤ NFI¤ ON!¤ P‚N!¤ QOP¤ RMQ¤ SLR¤ T>N!¤ UMT¤ VKSU¤ Wf l-a850ec-75¤ XW¤ YCX¤ Z@YIN1¤ [5Z!¤ \7Z!¤ ]éZ!¤ ^YI¤ _^!¤ `‚^!¤ a_`¤ b]a¤ c\b¤ d>^!¤ e]d¤ f[ce¤ gU¤ h‚¤ i¤ jg expression¤ k&j¤ lg m-a850ec-78¤ ml¤ nm¤ of l-a850ec-7d¤ pf l-a850ec-7e¤ qop¤ rknq¤ sm¤ tf l-a850ec-7a¤ ut¤ vsu¤ wrv¤ xãw!¤ yw!¤ zpw!¤ {Ãw!¤ |{¤ }w!¤ ~gformat¤ ~w!¤ €w!¤ fassertion failed: ~s¤ ‚w!¤ ƒéw!¤C5h %â]4     54>"G4954<?Bh?]45L67gfilenamef rnrs/base.scmŒ  ŒŒ   CO>"G4E54<?Bh?]45L67gfilenamef rnrs/base.scmŒ  ŒŒ   CO>"G4<HBRh?]4567gfilenamef rnrs/base.scmŒ  ŒŒ  C>"G4<UBûh?]4567gfilenamef rnrs/base.scmŒ  ŒŒ  C>"G4<þBÿh?]4567gfilenamef rnrs/base.scmŒ  ŒŒ  C>"GwvJƒJh Q]L‘$CLL@Igx  gfilenamef rnrs/base.scmŒ  s ŒŒ   C]vh)]L6!gs    C hP§)D345"-‘$C445>"G—"ÿÿÓ "ÿÿÌ){34545‘$"4>"G"6‘$C44545>"G—"ÿÿÊ "ÿÿÃ-1345454O>"G"=‘$C4 454 O5>"G—"ÿÿà "ÿÿ¼Ÿgproc Jgstring Jgend   Jgi   Cgproc S Ëgstring1 S Ëgstring2  S Ëgend1  a Ëgend2  a Ëgi  Ž Ägproc Ô Mgstring Ô Mgstrings  Ô Mgend  ä Mgends  ä Mgi   Fgfilenamef rnrs/base.scmŒ y e ŒŒ J  S Ë  Ô M  gnamegstring-for-eachŒCR†ˆ§¨ hh½)•3"|ˆ$Y$6&6ŽŽ45Œ"ÿÿ½Ž45Œ"ÿÿ (66"ÿÿr)3 "ôˆ$®ˆ$Š$[&6&6ŽŽŽŽ45Œ"ÿÿ‘ŽŽ45Œ"ÿÿh‰$"6()(6‰$"66"ÿþò-1345"C("A45‘$ Ž"ÿÿÞ4>"G""ÿÿµ"6(6Ž4  544  5?Œ"ÿÿÊ"ÿÿ»µgf ›gl ›ghare  ‰gtortoise  ‰gmove?  ‰gout  ‰gf ¤ ¶gl1 ¤ ¶gl2  ¤ ¶gh1  ¨ œgh2  ¨ œgt1  ¨ œgt2  ¨ œgmove?  ¨ œgout  ¨ œgf ¿ cgl1 ¿ cgrest  ¿ cglen  Æ grest  Ì gl1   Tgrest   Tgout   Tgfilenamef rnrs/base.scmŒ ( „ /ŒŒ * „ 5ŒŒ  Œ +ŒŒ Œ 1ŒŒ Ê ž 'ŒŒ Ì ž -ŒŒ â ¡ 'ŒŒ ä ¡ -ŒŒ F • 'ŒŒ O — ŒŒ U ˜ ŒŒ u « %ŒŒ ~ ­ ŒŒ „ ® ŒŒ ’ ± %ŒŒ ” ² ŒŒ õ » -ŒŒ ÷ » 3ŒŒ ›  ¤ ¶  ¿ c  gnamegmapŒCRh(a) 36]4545›CYgn gn  !gbase  !    ! gnameglogŒCRúh`±-13"%(C†$ Ž"ÿÿÝC(C45$ Ž"ÿÿ¶C©gbools Yglst 2glast  2gbool   2gbool = Ygfilenamef rnrs/base.scmŒ Ë ŒŒ Y gnameg boolean=?ŒCNRhX­-13"$(C& Ž"ÿÿÞC(CŠ$ Ž"ÿÿ»C¥gsyms Tglst 1glast  1gsym   1gsym < Tgfilenamef rnrs/base.scmŒ Ô ŒŒ T gnamegsymbol=?ŒCMR½Ìh i]45$ 45 ‘CCagx  gfilenamef rnrs/base.scmŒ Ý ŒŒ   gnameg real-valued?ŒCQRQ»Íh m]45$ 456Cegx  gfilenamef rnrs/base.scmŒ á ŒŒ   gnamegrational-valued?ŒCPRPÒÍh l]45$4455‘CCdgx  gfilenamef rnrs/base.scmŒ å ŒŒ   gnameginteger-valued?ŒCORƒeh‚-1345@zgproc gvecs gfilenamef rnrs/base.scmŒ é ŒŒ  gnamegvector-for-eachŒCKRdeh }-13445?6ugproc gvecs gfilenamef rnrs/base.scmŒ ë ŒŒ  gnameg vector-mapŒCLR4   %34689h(l]Cdgdummy  'gbinding  'gmodule   'goriginal   '  ' C<=h(“] 45$@6‹gx  "gtmp "  " g macro-typeg syntax-rulesŒgpatternsgbindingg@gmodulegoriginalC5 R4  @hR]6Jgid  gfilenamef rnrs/base.scmŒ  û ŒŒ   C\h*]C"gid     C_oh)]ŒC!gx     C<=h@•]4?$@45$@6gx  :gtmp  :gtmp  # :gfilenamef rnrs/base.scmŒ û ŒŒ  : g macro-typegidentifier-syntaxŒC5R4 p @hR]6Jgid  gfilenamef rnrs/base.scmŒ  þ ŒŒ   C‰h*]C"gid     C_™h)]ŒC!gx     C<=h@•]4?$@45$@6gx  :gtmp  :gtmp  # :gfilenamef rnrs/base.scmŒ þ ŒŒ  : g macro-typegidentifier-syntaxŒC5pR4 š @hR]6Jgid  gfilenamef rnrs/base.scmŒ   ŒŒ   C²h*]C"gid     C_Âh)]ŒC!gx     C<=h@•]4?$@45$@6gx  :gtmp  :gtmp  # :gfilenamef rnrs/base.scmŒ  ŒŒ  : g macro-typegidentifier-syntaxŒC5šR4 à @hR]6Jgid  gfilenamef rnrs/base.scmŒ   ŒŒ   CÛh*]C"gid     C_ëh)]ŒC!gx     C<=h@•]4?$@45$@6gx  :gtmp  :gtmp  # :gfilenamef rnrs/base.scmŒ  ŒŒ  : g macro-typegidentifier-syntaxŒC5ÃR4 ì @hR]6Jgid  gfilenamef rnrs/base.scmŒ   ŒŒ   Ch*]C"gid     C_h)]ŒC!gx     C<=h@•]4?$@45$@6gx  :gtmp  :gtmp  # :gfilenamef rnrs/base.scmŒ  ŒŒ  : g macro-typegidentifier-syntaxŒC5ìR4  @hR]6Jgid  gfilenamef rnrs/base.scmŒ   ŒŒ   C-h*]C"gid     C_=h)]ŒC!gx     C<=h@•]4?$@45$@6gx  :gtmp  :gtmp  # :gfilenamef rnrs/base.scmŒ  ŒŒ  : g macro-typegidentifier-syntaxŒC5R4 > @hR]6Jgid  gfilenamef rnrs/base.scmŒ   ŒŒ   CVh*]C"gid     C_fh)]ŒC!gx     C<=h@•]4?$@45$@6gx  :gtmp  :gtmp  # :gfilenamef rnrs/base.scmŒ  ŒŒ  : g macro-typegidentifier-syntaxŒC5>R57ghp‡šì> h—-134455444554444555$4445 55"4445 554445 555?6gwho gmessage g irritants  gfilenamef rnrs/base.scmŒ  ŒŒ  gnamegerrorŒCR57ghp‡Ãì> h¥-134455444554444555$4445 55"4445 554445 555?6gwho gmessage g irritants  gfilenamef rnrs/base.scmŒ  ŒŒ  gnamegassertion-violationŒCJR4 I ixyz|}€‚ƒ h0E] C=gdummy  +g expression  +  + C<=h(x] 45$@6pgx  "gtmp "  " g macro-typeg syntax-rulesŒgpatternsg expressionC5IRCÚgm  +giface 2 ¬giface ³ 4gfilenamef rnrs/base.scmŒ   ŒŒ Š X ŒŒ à } ŒŒ „ à ŒŒ ¬ Ë ŒŒ À Ô ŒŒ d Ý ŒŒ  á ŒŒ ¯ å ŒŒ e é ŒŒ  ë ŒŒ "Ò  ŒŒ $8  ŒŒ  %Ÿ C6