prelude: :gerbil/compiler/ssxi
package: scheme

(begin
  (declare-type scheme/base-etc#boolean=?__0 (@lambda 2 #f))
  (declare-type scheme/base-etc#boolean=?__1 (@lambda (2) #f))
  (declare-type
   scheme/base-etc#boolean=?
   (@case-lambda
    (2 scheme/base-etc#boolean=?__0)
    ((2) scheme/base-etc#boolean=?__1)))
  (declare-type scheme/base-etc#symbol=?__0 (@lambda 2 #f))
  (declare-type scheme/base-etc#symbol=?__1 (@lambda (2) #f))
  (declare-type
   scheme/base-etc#symbol=?
   (@case-lambda
    (2 scheme/base-etc#symbol=?__0)
    ((2) scheme/base-etc#symbol=?__1)))
  (declare-type scheme/base-etc#square__impl (@lambda 1 #f))
  (declare-type scheme/base-etc#list-copy (@lambda 1 #f))
  (declare-type scheme/base-etc#list-set! (@lambda 3 #f)))
