#S(#="lambda"
  #(
    #S(#="template"
      #(
        #0=#S(#="lambda"
          #(
            #S(#="lambda"
              #(1 #f)
              #()
              1
              "\x02\x80\x01\x00"; (set! f0 (cons g1 nil))
              0xfe
              0x80
              0x02
              0xff
            )
            #S(#="template"
              #(
                #=0
                #S(#="template"
                  #(#f)
                  "\x40\xff\xfe" ; i0 ctx k
                  1
                  "\x00\x80\x03\xfd\; (set! f0 (car argv))
                   \x0a\x80\x40\x80\; (set! f0 (fix* i0 f0))
                   \x02\x80\x80\x00"; (set! f0 (cons f0 nil))
                  0x42  ; i2
                  0x80  ; f0
                  0x01  ; g1
                  0x41  ; i1
                )
                1
              )
              "\x80" ; f0
              2
              "\x09\x80\x40\x03\; (set! f0 (fix- i0 g3))
               \x02\x80\x80\x00\; (set! f0 (cons f0 nil))
               \x00\x81\x1b\x02"; (set! f1 (lambda g2))
              0x01
              0x80
              0x81
              0xff
            )
            1
          )
          #()
          2
          "\x00\x80\x03\xfd\; (set! f0 (car argv))
           \x0d\x81\x80\x03\; (set! f1 (fix< f0 g3))
           \x81\x81\x01\x02\; (set! f1 (if f1 g1 g2))
           \x00\x81\x1b\x81"; (set! f1 (lambda f1))
          0x81
          0x00
          0xfe
          0xff
        )
        #f
      )
      "\xfe\xff"  ; k ctx
      0
      ""
      0x01
      0xfd
      0x40
      0x41
    )
    #="string->number"
  )
  #()
  1
  "\x00\x80\x1b\x01"; (set! f0 (lambda g1))
  0x02
  0xfd
  0x80
  0xff
)
; vim:set syntax= sw=2 expandtab: