> (error "abc")
[image] [image] error: undefined;
 cannot reference an identifier before its definition
> (make-rat 1 0)
[image] [image] /: division by zero
> (make-rat 1 2)
(1 . 2)
> (*rat (make-rat 1 2) (make-rat 1 2))
(1 . 4)
> (+rat (make-rat 1 2) (make-rat 1 3))
(5 . 6)
> (<rat (make-rat 1 3) (make-rat 1 2))
#t
> (<rat (make-rat 1 2) (make-rat 1 3))
#f
> (+rat (make-rat 1 2) (make-rat 1 4))
(6 . 8)
> (my-exp 1 10)
(18099969098565397826764800000
 .
 6658606584104736522240000000)
> (my-exp 1 10)
(18099969098565397826764800000
 .
 6658606584104736522240000000)
> (to-double (my-exp 1 10))
9864101/3628800
> (to-double (my-exp 1 10))
2.7182818011463845
> (exp 1)
2.718281828459045
> (my-exp 1 10)
(9864101 . 3628800)
> (to-double (my-exp 1 10))
2.7182818011463845
> (<rat (make -1 2) (make 1 2))
[image] [image] make: undefined;
 cannot reference an identifier before its definition
> (<rat (make-rat -1 2) (make-rat 1 2))
#t
> (<rat (make-rat -1 2) (make-rat -1 3))
#t
> (<rat (make-rat 1 -2) (make-rat -1 3))
#f
> (rat? (make-rat 1 -2))
#f
> (make-rat 1 -2)
(-1 . 2)
> (rat? (make-rat 1 -2))
#t
> (<rat (make-rat 1 -2) (make-rat 1 2))
#t
> (to-double (my-exp 1 10))
2.7182818011463845
> (my-exp 1 10)
(rat 9864101 . 3628800)
> 
> (my-exp 1 10)
(rat 9864101 . 3628800)
> (get-number (cons 1 2))
[image] [image] get-number: undefined;
 cannot reference an identifier before its definition
> (get-numer (cons 1 2))
[image] [image] /: division by zero
> (get-numer (cons 1 2))[image] Interactions disabled
> (my-exp 1 10)
(rat 9864101 . 3628800)
> (cons 'brat (cdr (my-exp 1 10)))
(brat 9864101 . 3628800)
> +
#<procedure:+>
> (my-exp 1 10)
#<procedure:...dbox/scheme/rat.scm:4:2>
> ((my-exp 1 10) 'print)
(9864101 . 3628800)
> (to-double (my-exp 1 10))
2.7182818011463845
> (to-double (my-exp 1 10))
2.7182818011463845
> (r1 '* r2)
> ((make-rat 1 2) '* (make-rat 2 3))
#<procedure:...dbox/scheme/rat.scm:10:4>
> (((make-rat 1 2) '* (make-rat 2 3)) 'print)
(1 . 3)
> (((make-rat 1 2) '* (make-rat 1 2) (make-rat 1 2) (make-rat 1 2) (make-rat 1 2)) 'print)
(1 . 1)
> (((make-rat 1 2) '* (make-rat 1 2) (make-rat 1 2) (make-rat 1 2) (make-rat 1 2)) 'print)
(1 . 32)
[image] read-syntax: expected a `)` to close `(`
  possible cause: indentation suggests a missing `)` before line 21

> (to-double (my-exp 1 10))
2.7182818011463845