ÿØÿàJFIFÿþ ÿÛC       ÿÛC ÿÀÿÄÿÄ"#QrÿÄÿÄ&1!A"2qQaáÿÚ ?Øy,æ/3JæݹÈ߲؋5êXw²±ÉyˆR”¾I0ó2—PI¾IÌÚiMö¯–þrìN&"KgX:Šíµ•nTJnLK„…@!‰-ý ùúmë;ºgµŒ&ó±hw’¯Õ@”Ü— 9ñ-ë.²1<yà‚¹ïQÐU„ہ?.’¦èûbß±©Ö«Âw*VŒ) `$‰bØԟ’ëXÖ-ËTÜíGÚ3ð«g Ÿ§¯—Jx„–’U/ÂÅv_s(Hÿ@TñJÑãõçn­‚!ÈgfbÓc­:él[ðQe 9ÀPLbÃãCµm[5¿ç'ªjglå‡Ûí_§Úõl-;"PkÞÞÁQâ¼_Ñ^¢SŸx?"¸¦ùY騐ÒOÈ q’`~~ÚtËU¹CڒêV  I1Áß_ÿÙGOOF----LE-8-2.08]:4h+] gguile  gdefine-module*   gsrfi gsrfi-60  gfilenameS fsrfi/srfi-60.scm gexportsS g bitwise-and g bitwise-ior g bitwise-xor g bitwise-not g any-bits-set? g bitwise-if g bitwise-merge glog2-binary-factors g first-set-bit gbit-set? gcopy-bit g bit-field gcopy-bit-field garithmetic-shift grotate-bit-field greverse-bit-field g integer->list g list->integer gbooleans->integer    g re-exportsS !glogand "glogior #glogxor $ginteger-length %glogtest &glogcount 'glogbit? (gash )!"#$%&'( *g replacementsS +g bit-count ,+ -gset-current-module .- /- 0gload-extension 1g string-append 2f libguile- 3geffective-version 4fscm_init_srfi_60 5glognot 6g bit-extract 7gcond-expand-provide 8gcurrent-module 9C5h]4    )*,5 4/>"G40i41i243i554>"G!i R"i R#iR5iR%iR&i+R5h]45Cgmask  gn0  gn1   gfilenamefsrfi/srfi-60.scm 8  9  :   :  9    gnameg bitwise-ifCRiRiR'iR6iR6h(]454 5Cgn  "gnewbits  "gstart   "gend   "gfilenamefsrfi/srfi-60.scm A  B   C   C 0  C   B  B ! B   " gnamegcopy-bit-fieldCR(iR7i48i596gm  0gfilenamefsrfi/srfi-60.scm   1 . 6 .  < .  = . + E .  G /  L . [ 1 b 2 i 3 p 4 w 5 ~ 6 W 8 ^ ; e = l > s ?  A  F  H   H &  H    C6