1 ;; This file contains initial data for «problem statement»

2 ;;

3 ;; It must contain definition of a function (f x) preceded by one-line

4 ;; `;;@ ` comments at top-level with TeX $n(x)$ function definition,

5 ;; as well as definition of variables `right-bound`, `subintervals`

6 ;; and `test-epsilon`. Example:

7 ;;

8 ;; ;;@ $n(x) = x^2$

9 ;; (define (f x)

10 ;; (expt x 2))

11 ;;

12 ;; (define right-bound 2)

13 ;; (define subintervals 100)

14 ;; (define test-epsilon 0.001)

15 ;;

16 ;; REAL INITIAL DATA STARTS BELOW:

17

18 ;;@ $n(x) = \begin{cases} 35+3(x-1)^2 & 0<x<2\\ 36 & x \leq 0,\ x \geq 2 \end{cases}$

19 (define (f x)

20 (if (and (> x 0) (< x 2))

21 (+ 35 (* 3 (expt (- x 1) 2)))

22 36))

23

24 (define right-bound 2)

25 (define subintervals 100)

26 (define test-epsilon 0.0001)