Welcome to the CHICKEN Scheme pasting service

/*
o|eliminated procedure checks: 6 
o|replaced variables: 18 
o|removed binding forms: 16 
o|removed binding forms: 16 
o|simplifications: ((if . 2) (##core#call . 8)) 
o|  call simplifications:
o|    ##sys#foreign-block-argument      2
o|    ##sys#foreign-fixnum-argument
o|    ##sys#block-ref
o|    ##sys#check-structure     2
o|    ##sys#structure?
o|    ##sys#make-structure
o|contracted procedure: k77 
o|contracted procedure: k86 
o|contracted procedure: k106 
o|contracted procedure: k110 
o|contracted procedure: k120 
o|removed binding forms: 5 
o|customizable procedures: (loop39) 
o|calls to known targets: 2 
o|fast box initializations: 1 
*/