ELF@@@8@DD@@CCCpp`99D???4@<@= @< @=@= '@< 0 P@D)@?'@400@D*@?(@4@<8@PD?@?=@4 69800 0  4 @< ~A 4 6800 0  9B4 @< A 4 680 0  9>4 @< A 4 68@0 0  4 9:< A0 @ 4 96< A0 @ 4 92< A0 @ @9 .>A=AB@< A59"= AB 5 @9 &= AB 5 9 *= AB 5 = AB 5 = AB 5 =AB 5=AB 5=AB 5=AB 50=AB059=AB 509 =AB5 =AA4=0@A4=?A 4<A00=AB 5 A4= ?A  4 A4<A0@ > A<A0 0 =AB5A4<A@>A< A0 0  =AB5=@A4  =AB5@>A=AB@<A5>A=AB<A5>A=AB< A5>A=AB < A5 >A= AB < A5 >A= BB < A5 >B=BB <B5A4 = B< 5 0 00`0`0`0`0B 5 A4 A 40 0`0`= AB 5 A4 = AA40 00`0`0`0B5 A4 A 4A  40 00`=AB 5 A4 A 40 = AB 5 A4 = AA  40 00`0`0`0B 5 A4 A  4 A40 00`=AB 5 A4 A 40 = AB 5 A4 = AA  40 00`0`0`0B 5 A4 A 4 A  4 A40 00`  0  =AB5 A4@=A<A0 @0 0`0`0`0` B 5@A4@A4A40 0`0`  0 @ =AB@5`A 4`A4@0 ` =AB@5`A 4`A4@0 `0 =AB@5`A 4`A4 P0 `0 0 =ABP5`@>A=ABP<A5@>A=AB`<A5P9 0DA=A4 @970Q0 00000DA=A4 @970Q0 00000DA<A4 @970Q0 00000DA<~A4 @970Q0 0000 DzA<xA4 @<A DA<A4 @9 DA<A4 @<A& CA??4j9  CA?=4@<|ACA? ?4l0 0000 CuA?=4@<qACwA?M?4lCqA?>4l0 0000`9333336989CWA?=4 0 `= UA= m@9 = ZA=bA000# DRR@* 0* S CSAq?S=4@0p0_ aW!C DA`?@4 C @AZ?,@4  0 !S C)AG?)=4@0p0W!Q 5R 54PSP5PC#A1?!A4PC A+?<4 D %A;#A4 4 0`00 0 0 P5`95`"#CA?]>4PPl"C@>?@4PC@>?4 0 P"C@>=4PC@>>4 0 P0 !0`" " C@>+>4ppl!0p"k940Q4 QQQQQC@>=4lC@>=4lC@>=4lC@>=4pplC@> >4``lC@> >4@@lQQQQQQ*D@=;@4 0 0 !0"CN@j>?4CJ@d>6?400P Cr@T>0>4p4@6i84 406t8Da@;;4 0 p0 P0 @00000`00 000 5"CI@'>c<4C'@!>>4000 P9C4@><=400PP"jP7`4 )0@!9"C@=;4@o0@0`0000 9  C @=;40<@7@000 00@0 D?:;4 7P4P0 0@00000&j9C?==4)9 9 P93C?==4@@le@@5@C?=<4@@l"C?=#;4`6.8@0@` ""C?=p=4@" "6%8!<?D?,:;40@0P0`0p000C?|==4097@000@00 6 7 8 80   C?]=3<4D?9?4p0P 74`X002 70  0P `C\?<=<4pPlCV?4=<4@@lCP?,=<400l"CH?"=,=400@`4ppl68P80!688P0`0p0P 7P0@06 7P8P8@00  C?<@<4  7@l7@0 0000 C><*<4  7@l90 0000C><;4l 68 86&8 8800  j 70)C><94o000070W0l PC><;4@0P@"C><=4@C><=40P0@jP7`)C>z<94@o7`0@0`007`W`l PCx>t<;4ppl9_,Cm>g<K=4pCi>a<<400p6 8`8P0p 07P97P"j@)Wm00!0"o!0 0 @=:>C:>=<4090@0D/>{8U940000@0P0 6 8@00 0`=>C><<4@7p0@0`PD>Q8+94`0`0P0p0@?.8<)8O>.8?08<+8O>08=.8>.8?28,8?58<08O>58?78<28O>78?98<48O>98=78>78=)8>78?7818=8>48?48.8?58<08O>58=38P>28?48?98<48O>98=78P>68?88<38O>88=68P>58?78<28O>78?;8<68O>;8??8<:8O>?8??8=:8>>8?>888=7>;8?;858?<8<78O><8?@8<;8O>@8?B8<=8O>B8?D8<?8O>D8?F8<A8O>F8?H8<C8O>H8?J8<E8O>J8?L8<G8O>L8?N8<I8O>N8?P8<K8O>P8?R8<M8O>R8?T8<O8O>T8?V8<Q8O>V8?X8<S8O>X8?Z8<U8O>Z8?\8<W8O>\8?^8<Y8O>^8?`8<[8O>`8?b8<]8O>b8?d8<_8O>d8?f8<a8O>f8?h8<c8O>h8?j8<e8O>j8?l8<g8O>l8?n8<i8O>n8=l8>l8=^8>l8?l8f8=M8>i8?i8c8=<8>f8?f8`8=+8>c8?c8]8=8>`8?`8Z8= 8>]8?]8W8=7>Z8?Z8T8=7>W8?W8Q8=7>T8?T8N8=7>Q8?Q8K8=7>N8?N8H8=7>K8?K8E8=7>H8?H8B8=7>E8?E8?8=p7>B8?B8<8=_7>?8??898=N7><8?<868==7>98?9838=,7>68?6808=7>38?38-8= 7>08?08*8=6>-8?-8'8?,8F6?+8%8=6>(8?(8"8?)8<$8O>)8?+8<&8O>+8=)8>)8=8>)8?)8#8?*8<%8O>*8?,8<'8O>,8=*8>*8=8>*8?*8$8?+8<&8O>+8?-8<(8O>-8?/8<*8O>/8=-8>-8=8>-8?-8'8=8>*8?*8$8?)87?(8"8=u6>%8?%88?&8?'8 ?(8?+8<&8O>+8?-8?.8<)8O>.8?08<+8O>08?28<-8O>28?48</8O>48?68<18O>68?88<38O>88?:8<58O>:8?<8<78O><8?>8<98O>>8?@8<;8O>@8?B8<=8O>B8?D8<?8O>D8?F8<A8O>F8?H8?M8<H8O>M8?O8?V8?W8<R8O>W8?Y8?`8?a8<\8O>a8?c8<^8O>c8?g8<b8O>g8?i8?l8<g8O>l8?n8?q8<l8O>q8?s8?v8<q8O>v8?x8-?{8<v8O>{8?}8?8<{8O>8?8?8<8O>8?8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8=8>8=8>8?88?8<8O>8=8>8=}8>8?88?88?88?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8?8<8O>8?8?8<8O>8?8<8O>8=N7>8=Z7>8?88=c7>8?88=7>8?88?8<8O>8?8<8O>8=U7>8=a7>8?88=j7>8?88?8?8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8<8O>8?8?9?9<9O>9?19<,9O>199 'define-module*'guile'rnrs'records' procedural'filename'rnrs/records/procedural.scm'pure'version'set-current-module'resolve-r6rs-interface'base'call-with-deferred-observers'only'cons*'logand'logior'ash'and=>'throw'display'make-struct/no-tail' make-vtable'map' simple-format' string-append' symbol-append'struct?' struct-layout' struct-ref' struct-set!' struct-vtable'vtable-index-layout'make-hash-table' hashq-ref' hashq-set!' vector->list'ice-9'receive'srfi':1'fold'split-at'take'record-internal?'rtd-index-name' rtd-index-uid'rtd-index-parent'rtd-index-sealed?'rtd-index-opaque?'rtd-index-predicate'rtd-index-field-names'rtd-index-field-bit-field'rtd-index-field-binder'rctd-index-rtd'rctd-index-parent'rctd-index-protocol'symbol->string''vtable-base-layout'prprprprprprprprprpr'record-type-vtable'prprpr'record-constructor-vtable' uid-table'make-record-type-descriptor'record-type-descriptor?'"make-record-constructor-descriptor'record-constructor'record-predicate'record-accessor'record-mutator' &condition'!&condition-constructor-descriptor'&serious'&serious-constructor-descriptor'make-serious-condition' &violation'!&violation-constructor-descriptor'make-violation' &assertion'make-assertion-violation'&raise-object-wrapper' immutable'obj' continuation'make-raise-object-wrapper'raise-object-wrapper?'raise-object-wrapper-obj'!raise-object-wrapper-continuation' r6rs-raise'r6rs-raise-continuable'module-use-interfaces!'module-export!'module-re-export!'module-replace!'#'#'pr'mutable'pw' list->vector'cadr'equal?'#'length'r6rs:exceptiond,`!#%',)P+t.147X:=@BTDGJ<N|RV$Zd^b f4 i l o r4 ux x {D},D$@,XhTH, ****" ****(( ** * * ** *  `7A`7`7`7@ L`7@            EEEE EE EE"EEEEE ! !   ! EE E*p2p2W@ 1*@@<CCpE(2VM.HU3k z 5* *P,8,b--(5@@$ $ l l   D 'D t <t K Z i h { h  (( () (|> |Y q < <p p0 0<0 <,7 ,   8  8d d    f L  L   d     $ ( ( (((.(5555555555555555 55 . 5. 55 5.5555555  5  5 5  5 5  5  5 5 5 5.55:  $,4<D L(T,l  (,  (, (, , 00$((((,,,0000$$    $8<<<$$$$<@$<       0      (          $ $ ( $ ( , ( , 0       ,  0   0 <  0 4   4  H  0H00D0004D444D44@4440H,,,00<8L8888,FK $ ,0FK $ ,0FK $ ,0FK $ ,0 ( $ (OK $(4OSX$ 8<@DOSXX$ 8<@DX\`d5`gks{$     X X  XsFXFXFFFFKXXXXXXFFFFFK  XXX    $((,,084L8PDh