Chez Scheme Transcript [Thu Mar 17 13:43:29 2011]
> (and (begin (set! a 3) #f) (begin (set! b 4) #f))
#f
> a
3
> b

Error: variable b is not bound.
Type (debug) to enter the debugger.
> (load "and.ss")

Error in open-input-file: error opening "and.ss": No such file or directory.
Type (debug) to enter the debugger.
> (load "day6.ss")
> (load "day6.ss")
> ((and (begin (set! a 3) #t)) (begin (set! b 5) #f))
#f
> b
5
> (lambda () (+ 3 4))
#<procedure>
> (lambda () (set! foo 42))
#<procedure>
> foo

Error: variable foo is not bound.
Type (debug) to enter the debugger.
> ((lambda () (set! foo 42)))
> foo
42
> (and (lambda () (set! b 13) #f) (lambda () (set! a 77) #t))

Error: incorrect number of arguments to #<procedure and>.
Type (debug) to enter the debugger.
> (load "day6.ss")
> (and (lambda () (set! b 13) #f) (lambda () (set! a 77) #t))
#<procedure>
> b
5
> a
3
> (load "day6.ss")
> (and (lambda () (set! b 13) #f) (lambda () (set! a 77) #t))
#f
> b
13
> a
3
> (transcript-off)