(FPCore (z0 z1) (* z0 (- 1 (* z1 z1))))
(FPCore (z0 z1) (* z0 (- (* z1 z1) 1)))
(FPCore (z0 z1) (* (- 1 (* z1 z1)) z0))
(FPCore (z0) (pow (cos z0) 4))
(FPCore (z0 z1) (* (/ z1 z0) z1))
(FPCore (z0 z1) (* (cos z1) z0))
(FPCore (z0) (- (* 1/2 (cos z0)) -1/2))
(FPCore (z0) (- (* 1/2 (cos (+ z0 z0))) -1/2))
(FPCore (z0 z1) (/ z1 (* z0 z0)))
(FPCore (z0) (* 5/2 (cos (+ z0 z0))))
(FPCore (z0) (* 5/2 (cos z0)))
(FPCore (z0 z1) (/ (- z0 -1) (- 1 (* z1 z1))))
(FPCore (z0 z1) (* (/ z1 (* z0 z0)) z1))
(FPCore (z0) (- -3/2 (* 5/2 (cos (+ z0 z0)))))
(FPCore (z0) (- -3/2 (* 5/2 (cos z0))))
(FPCore (z0) (- (cos z0) -1))
(FPCore (z0) (- (cos (+ z0 z0)) -1))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) z0))
(FPCore (z0) (* -40 (pow (cos z0) 4)))
(FPCore (z0 z1) (* (* z1 z0) z1))
(FPCore (z0 z1) (* (* (* z0 (- 1 (* z1 z1))) z0) (- 1 (* z1 z1))))
(FPCore (z0 z1) (* (* z0 z1) z1))
(FPCore (z0 z1) (* z0 (cos z1)))
(FPCore (z0 z1) (* (sin z0) z1))
(FPCore (z0 z1 z2) (* (* (* z2 z1) 1/2) z0))
(FPCore (z0 z1 z2) (* (* (* 1/2 z0) z2) z1))
(FPCore (z0 z1) (/ (- -1 (* z0 z1)) (- (* z1 z1) 1)))
(FPCore (z0 z1) (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1)))
(FPCore (z0 z1) (/ z0 (- (* z1 z1) 1)))
(FPCore (z0 z1 z2) (* (* z0 (/ z2 (* z1 z1))) z2))
(FPCore (z0 z1) (/ z0 (* (- (* z1 z1) 1) (- (* z1 z1) 1))))
(FPCore (z0 z1 z2) (* (* z0 z1) z2))
(FPCore (z0 z1 z2) (* (* (* z1 z0) z1) (- 1 (* z2 z2))))
(FPCore (z0 z1 z2) (* (* (* z1 (- 1 (* z2 z2))) z1) z0))
(FPCore (z0 z1 z2) (* (* (* z1 (- 1 z0)) z1) (- 1 (* z2 z2))))
(FPCore (z0 z1 z2) (* (* z0 z1) (- 1 (* z2 z2))))
(FPCore (z0 z1) (/ z0 (- -3/2 (* 5/2 (cos (+ z1 z1))))))
(FPCore (z0 z1 z2) (* (* (* z1 (- 1 (* z2 z2))) z1) (- 1 z0)))
(FPCore (z0 z1) (* (* z0 (- 1 (* z1 z1))) z0))
(FPCore (z0 z1 z2) (/ z0 (* (* z1 (- (* z2 z2) 1)) (- (* z2 z2) 1))))
(FPCore (z0 z1) (sin (+ (+ z1 z0) z1)))
(FPCore (z0 z1) (sin (+ z1 z0)))
(FPCore (z0 z1 z2) (* (* 1/2 (/ z2 z1)) z0))
(FPCore (z0 z1) (/ z0 (- 1 (* z1 z1))))
(FPCore (z0 z1) (sin (- (+ z1 z1) z0)))
(FPCore (z0 z1 z2) (* (* (* 1/2 z0) z1) z2))
(FPCore (z0 z1) (sin (- z1 (- (* -3 z0) z1))))
(FPCore (z0 z1) (sin (- z0 (* -3 z1))))
(FPCore (z0) (pow (cos z0) 3))
(FPCore (z0 z1) (* (* (- (* z1 z1) 1) (- (* z1 z1) 1)) z0))
(FPCore (z0 z1) (* (sin z1) z0))
(FPCore (z0 z1) (* (* z0 z0) (- 1 (* z1 z1))))
(FPCore (z0 z1) (* (* (/ (- -1 z0) (- 1 (* z1 z1))) (/ (- -1 z0) (- 1 (* z1 z1)))) (- 1 (* z1 z1))))
(FPCore (z0 z1) (* (* (/ z0 (- 1 (* z1 z1))) (/ z0 (- 1 (* z1 z1)))) (- 1 (* z1 z1))))
(FPCore (z0 z1) (* (/ (- -1 z0) (- 1 (* z1 z1))) (/ (- -1 z0) (- 1 (* z1 z1)))))
(FPCore (z0 z1) (* (/ z0 (- 1 (* z1 z1))) (/ z0 (- 1 (* z1 z1)))))
(FPCore (z0) (- 1/2 (* (cos z0) -1/2)))
(FPCore (z0) (- 1/2 (* (cos (+ z0 z0)) -1/2)))
(FPCore (z0 z1 z2) (* (* z1 z0) z2))
(FPCore (z0 z1 z2) (* (* z1 (- (* z2 z2) 1)) (- z0 1)))
(FPCore (z0 z1 z2) (* (* z1 (- z0 1)) (- (* z2 z2) 1)))
(FPCore (z0 z1 z2) (* (* z1 z0) (- (* z2 z2) 1)))
(FPCore (z0 z1 z2) (* (* z1 (- (* z2 z2) 1)) z0))
(FPCore (z0 z1) (* (- (* z1 z1) 1) z0))
(FPCore (z0 z1) (* z0 (* 1/2 (cos z1))))
(FPCore (z0 z1) (* (cos z0) z1))
(FPCore (z0 z1) (* (sqrt z0) (- 1 (* z1 z1))))
(FPCore (z0 z1) (* z0 (cos (+ z1 z1))))
(FPCore (z0 z1 z2) (/ z0 (* (* (* z1 (- (* z2 z2) 1)) z1) (- (* z2 z2) 1))))
(FPCore (z0 z1 z2) (* (* (/ z2 (* z1 z1)) z2) z0))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) (- -3/2 z0)))
(FPCore (z0 z1) (* z0 (sin (+ z1 z1))))
(FPCore (z0 z1 z2) (/ z2 (* z0 (- 1 (* z1 z1)))))
(FPCore (z0 z1) (/ (* -40 z0) (- -3/2 (* 5/2 (cos (+ z1 z1))))))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- z0 1)))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) z0))
(FPCore (z0) (/ (* -40 (pow (cos z0) 4)) (- -3/2 (* 5/2 (cos (+ z0 z0))))))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos z0)))))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 z0))))
(FPCore (z0 z1) (/ (* -40 (pow z0 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))))
(FPCore (z0 z1 z2) (/ z2 (* (* (* z0 (- 1 (* z1 z1))) z0) (- 1 (* z1 z1)))))
(FPCore (z0) (* (cos (+ z0 z0)) 5/2))
(FPCore (z0 z1 z2) (* z2 (/ z2 (* z0 (- 1 (* z1 z1))))))
(FPCore (z0) (* (cos z0) 5/2))
(FPCore (z0 z1 z2) (* z2 (/ z2 (* (* (* z0 (- 1 (* z1 z1))) z0) (- 1 (* z1 z1))))))
(FPCore (z0 z1 z2) (* (* (* z0 1/2) z2) (/ z2 (* z1 z1))))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5 z0))))
(FPCore (z0 z1 z2) (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) z0))
(FPCore (z0 z1) (* (/ (- -1 (* z0 z1)) (- 1 (* z1 z1))) (/ (- -1 (* z0 z1)) (- 1 (* z1 z1)))))
(FPCore (z0 z1) (* (pow (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1)) 2) (- 1 (* z0 z0))))
(FPCore (z0 z1) (pow (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1)) 2))
(FPCore (z0 z1 z2) (* (pow (/ (- -1 (* (cos z2) z1)) (- z0 1)) 2) (- 1 (* z1 z1))))
(FPCore (z0 z1 z2) (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 z0)))
(FPCore (z0 z1 z2) (pow (/ (- -1 (* (cos z2) z1)) (- z0 1)) 2))
(FPCore (z0 z1 z2) (* (pow (/ (- -1 (* (cos z2) z1)) z0) 2) (- 1 (* z1 z1))))
(FPCore (z0 z1 z2) (pow (/ (- -1 (* (cos z2) z1)) z0) 2))
(FPCore (z0 z1) (* (* (/ (- -1 (* z0 z1)) (- 1 (* z1 z1))) (/ (- -1 (* z0 z1)) (- 1 (* z1 z1)))) (- 1 (* z1 z1))))
(FPCore (z0 z1 z2) (* (* (* z0 1/2) z1) z2))
(FPCore (z0) (- -3/2 (* (cos z0) 5/2)))
(FPCore (z0) (- -3/2 (* (cos (+ z0 z0)) 5/2)))
(FPCore (z0 z1 z2) (* (* z0 z2) z1))
(FPCore (z0 z1) (* z0 (sin z1)))
(FPCore (z0) (* (- (cos (+ z0 z0)) -1) 11/2))
(FPCore (z0 z1 z2) (* (sin (- z0 (* -3 z2))) z1))
(FPCore (z0 z1 z2) (* (sin (- (+ z2 z2) z0)) z1))
(FPCore (z0 z1 z2) (* (sin (- z2 (- (* -3 z1) z2))) z0))
(FPCore (z0) (* (- (cos z0) -1) 11/2))
(FPCore (z0 z1 z2) (* (sin (+ (+ z2 z2) z1)) z0))
(FPCore (z0 z1 z2) (* 1/2 (* z1 (/ z2 z0))))
(FPCore (z0 z1) (* (pow (cos z1) 3) z0))
(FPCore (z0 z1) (* (* (* z0 z0) z0) z1))
(FPCore (z0) (* (- 1/2 (* (cos z0) -1/2)) 5))
(FPCore (z0 z1) (* (* (* (- (* z1 z1) 1) (- (* z1 z1) 1)) z0) (- 1 (* z1 z1))))
(FPCore (z0) (* (- 1/2 (* (cos (+ z0 z0)) -1/2)) 5))
(FPCore (z0 z1) (/ (- (* z0 (cos z1)) -1) (- 1 (* z0 z0))))
(FPCore (z0 z1) (/ (- (* z1 z0) -1) (- 1 (* z1 z1))))
(FPCore (z0 z1) (* (* z1 z1) z0))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) z0))
(FPCore (z0 z1) (cos (* 2 (+ z1 z0))))
(FPCore (z0) (- -1 (cos z0)))
(FPCore (z0 z1) (sin (* (+ z1 z0) 2)))
(FPCore (z0) (- -1 (cos (+ z0 z0))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) z0)))
(FPCore (z0 z1 z2) (* (* (* (* 1/2 z0) z2) z1) z1))
(FPCore (z0) (- (* (- (cos z0) -1) 11/2) 1))
(FPCore (z0) (- (* (- (cos (+ z0 z0)) -1) 11/2) 1))
(FPCore (z0 z1) (cos (* (+ z1 z0) -2)))
(FPCore (z0) (- 1 (* (- 1/2 (* (cos (+ z0 z0)) -1/2)) 5)))
(FPCore (z0) (- 1/2 (* 1/2 (cos z0))))
(FPCore (z0) (- 1/2 (* 1/2 (cos (+ z0 z0)))))
(FPCore (z0) (- 1 (* (- 1/2 (* (cos z0) -1/2)) 5)))
(FPCore (z0 z1 z2) (* z0 (sin (+ (+ z2 z2) z1))))
(FPCore (z0) (* (- -1 (cos z0)) 5/2))
(FPCore (z0) (* 11 (- (* 1/2 (cos (+ z0 z0))) -1/2)))
(FPCore (z0 z1) (/ z0 (- (* (- -1 (cos (+ z1 z1))) 5/2) -1)))
(FPCore (z0) (* (- -1 (cos (+ z0 z0))) 5/2))
(FPCore (z0) (- (* (- -1 (cos (+ z0 z0))) 5/2) -1))
(FPCore (z0) (* 11 (- (* 1/2 (cos z0)) -1/2)))
(FPCore (z0) (- (* (- -1 (cos z0)) 5/2) -1))
(FPCore (z0 z1) (/ z1 (- (sqrt z0) -1)))
(FPCore (z0 z1 z2) (* (* (* 1/2 z0) z2) (/ z2 (* z1 z1))))
(FPCore (z0 z1) (* (* (/ (- -1 z0) (- 1 (* z1 z1))) (/ (- -1 z0) (- 1 (* z1 z1)))) (/ (- z0 -1) (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (* z0 (/ z2 (* z1 z1))))
(FPCore (z0 z1 z2) (* z0 (* z1 (- (* z2 z2) 1))))
(FPCore (z0 z1 z2) (* (* (* (/ z2 (* z1 z1)) z2) 1/2) z0))
(FPCore (z0 z1) (* z1 (sin z0)))
(FPCore (z0 z1) (* (* (* 1/2 z0) z1) z1))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* 11 (- (* 1/2 (cos z0)) -1/2)) 1)))
(FPCore (z0) (- (* 11 (- (* 1/2 (cos (+ z0 z0))) -1/2)) 1))
(FPCore (z0 z1) (- (- (/ (* -40 (pow (cos z1) 4)) z0) (* 11 (- (* 1/2 (cos (+ z1 z1))) -1/2))) -1))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* 11 (- z0 -1/2)) 1)))
(FPCore (z0) (- (/ (* -40 (pow (cos z0) 4)) (- -3/2 (* 5/2 (cos (+ z0 z0))))) (- (* 11 (- (* 1/2 (cos (+ z0 z0))) -1/2)) 1)))
(FPCore (z0 z1 z2) (* (* z1 (- 1 (* z2 z2))) z0))
(FPCore (z0 z1) (- (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 z0)) (* 11 (- (* 1/2 (cos (+ z1 z1))) -1/2))) -1))
(FPCore (z0 z1 z2) (* z1 (* z0 (- 1 (* z2 z2)))))
(FPCore (z0 z1 z2) (* (* z1 (- 1 (* z2 z2))) (- 1 z0)))
(FPCore (z0 z1) (- (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5 z0))) (* 11 (- (* 1/2 (cos (+ z1 z1))) -1/2))) -1))
(FPCore (z0 z1) (- (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos z0)))) (* 11 (- (* 1/2 (cos (+ z1 z1))) -1/2))) -1))
(FPCore (z0 z1 z2) (/ (* 3 (- 1/2 (* 1/2 (cos (+ z2 z2))))) (* (* (- (* z1 z1) 1) (- (* z1 z1) 1)) z0)))
(FPCore (z0 z1) (- (/ (* -40 (pow z0 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* 11 (- (* 1/2 (cos (+ z1 z1))) -1/2)) 1)))
(FPCore (z0 z1) (- (- z0 (* 11 (- (* 1/2 (cos (+ z1 z1))) -1/2))) -1))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* 11 z0) 1)))
(FPCore (z0 z1) (- (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 z0))) (* 11 (- (* 1/2 (cos (+ z1 z1))) -1/2))) -1))
(FPCore (z0 z1 z2) (* (* z1 (- 1 z0)) (- 1 (* z2 z2))))
(FPCore (z0 z1) (- (/ z0 (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* 11 (- (* 1/2 (cos (+ z1 z1))) -1/2)) 1)))
(FPCore (z0) (- (* 11 (- (* 1/2 (cos z0)) -1/2)) 1))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* 11 (- (* 1/2 z0) -1/2)) 1)))
(FPCore (z0 z1) (- (/ (* -40 z0) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* 11 (- (* 1/2 (cos (+ z1 z1))) -1/2)) 1)))
(FPCore (z0) (* (- (cos z0) -1) -1/2))
(FPCore (z0 z1 z2) (- (cos z2) (* (* (- (cos z0) -1) -1/2) z1)))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) z0) 1)))
(FPCore (z0 z1) (/ (- -1 z0) (- 1 (* z1 z1))))
(FPCore (z0 z1 z2) (- z0 (* (- (cos (+ z2 z2)) -1) (* -1/2 z1))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- z0 1)))
(FPCore (z0) (* (- (cos (+ z0 z0)) -1) -1/2))
(FPCore (z0 z1) (/ (- -1 (* (cos z1) z0)) (- 1 (* z0 z0))))
(FPCore (z0 z1) (/ (- -1 (* z0 z1)) (- 1 (* z1 z1))))
(FPCore (z0 z1) (* (cos (+ z1 z1)) z0))
(FPCore (z0 z1) (* (- (cos (+ z1 z1)) -1) (* -1/2 z0)))
(FPCore (z0 z1) (- (cos z1) (* (- (cos (+ z1 z1)) -1) (* -1/2 z0))))
(FPCore (z0 z1) (* (* (- (cos z0) -1) -1/2) z1))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) (- (* (- -1 z0) 5/2) -1)))
(FPCore (z0 z1) (/ (* -40 (pow z0 4)) (- (* (- -1 (cos (+ z1 z1))) 5/2) -1)))
(FPCore (z0 z1) (/ (* -40 z0) (- (* (- -1 (cos (+ z1 z1))) 5/2) -1)))
(FPCore (z0 z1 z2) (* (/ z2 z1) z0))
(FPCore (z0 z1) (* (* (* z0 1/8) z1) (- 1 (* z1 z1))))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) (- (* (- -1 (cos z0)) 5/2) -1)))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) (- (* z0 5/2) -1)))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) (- z0 -1)))
(FPCore (z0) (/ (* -40 (pow (cos z0) 4)) (- (* (- -1 (cos (+ z0 z0))) 5/2) -1)))
(FPCore (z0 z1) (* 3 (+ (cos z1) z0)))
(FPCore (z0 z1) (cos (+ (+ z1 z0) z1)))
(FPCore (z0 z1) (cos (- (+ z1 z1) z0)))
(FPCore (z0 z1) (cos (- z1 z0)))
(FPCore (z0 z1) (* z0 (tan z1)))
(FPCore (z0 z1) (* (- 1 (* z0 z0)) (tan z1)))
(FPCore (z0 z1) (* (fabs (sin z1)) z0))
(FPCore (z0 z1) (cos (+ z1 z0)))
(FPCore (z0 z1 z2) (* z0 (cos (* 2 (+ z2 z1)))))
(FPCore (z0 z1) (cos (- z1 (- (* -3 z0) z1))))
(FPCore (z0 z1) (/ 1 (* z0 (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (/ z0 (* (- 1 (* z1 z1)) (tan z2))))
(FPCore (z0 z1 z2) (* (sin (+ z2 z0)) z1))
(FPCore (z0 z1 z2) (* (- (+ (* (sin z2) z1) z2) z0) 6))
(FPCore (z0 z1) (* (- z0 z1) 6))
(FPCore (z0 z1 z2) (* (- (+ z2 z0) z1) 6))
(FPCore (z0 z1 z2) (* z0 (sin (- z2 (- (* -3 z1) z2)))))
(FPCore (z0 z1 z2) (* z0 (/ z2 z1)))
(FPCore (z0 z1) (* z0 (- (* 1/2 (cos (+ z1 z1))) -1/2)))
(FPCore (z0 z1 z2) (+ (sin (* (+ z2 z1) 2)) z0))
(FPCore (z0 z1 z2) (+ (* (sin (+ (+ z2 z2) z1)) z0) (sin (* (+ z2 z1) 2))))
(FPCore (z0 z1 z2) (* (/ z0 (* (- (* z1 z1) 1) (- (* z1 z1) 1))) (* 1/2 (cos z2))))
(FPCore (z0 z1 z2) (pow (/ (- -1 (* (cos z2) z1)) z0) 3))
(FPCore (z0 z1) (pow (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1)) 3))
(FPCore (z0 z1) (* (* z0 z0) (pow (cos z1) 3)))
(FPCore (z0 z1 z2) (pow (/ (- -1 (* (cos z2) z1)) (- z0 1)) 3))
(FPCore (z0 z1) (* (* (/ z0 (- 1 (* z1 z1))) (/ z0 (- 1 (* z1 z1)))) (/ z0 (- (* z1 z1) 1))))
(FPCore (z0 z1) (* (sin (+ z1 z1)) z0))
(FPCore (z0 z1) (* (* z1 z1) (* (* z0 z0) z0)))
(FPCore (z0 z1) (* (* (/ (- -1 (* z0 z1)) (- 1 (* z1 z1))) (/ (- -1 (* z0 z1)) (- 1 (* z1 z1)))) (/ (- -1 (* z0 z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1) (* z0 (pow (cos z1) 3)))
(FPCore (z0 z1 z2) (- (* (* z0 z0) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 z0)) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (* (* (* z1 (- z0 1)) z1) (- (* z2 z2) 1)))
(FPCore (z0 z1 z2) (- (* z0 (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (/ (- -1 (* z0 z1)) (- 1 (* z1 z1)))))
(FPCore (z0 z1) (* (* z0 (- (* z1 z1) 1)) z0))
(FPCore (z0) (pow (- -3/2 (* 5/2 (cos (+ z0 z0)))) -2))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) z0) 2) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))))
(FPCore (z0) (pow (- -3/2 (* 5/2 (cos z0))) -2))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 z0))))
(FPCore (z0 z1 z2) (- (* (* (/ (- -1 (* z0 z1)) (- 1 (* z1 z1))) (/ (- -1 (* z0 z1)) (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (/ z0 (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (- (* (* (/ (- -1 z0) (- 1 (* z1 z1))) (/ (- -1 z0) (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (* (* (* z1 (- (* z2 z2) 1)) z1) (- z0 1)))
(FPCore (z0 z1 z2) (* (* (* z1 (- (* z2 z2) 1)) z1) z0))
(FPCore (z0 z1) (* z0 (pow (- -3/2 (* 5/2 (cos (+ z1 z1)))) -2)))
(FPCore (z0 z1 z2) (* (* (* z1 z0) z1) (- (* z2 z2) 1)))
(FPCore (z0 z1 z2) (- z0 (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) z0) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))))
(FPCore (z0) (pow (- -3/2 (* 5/2 z0)) -2))
(FPCore (z0 z1 z2) (- (* (* (/ z0 (- 1 (* z1 z1))) (/ z0 (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))))
(FPCore (z0) (pow (- -3/2 (* 5 z0)) -2))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (/ (- -1 z0) (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- z0 1)) 2) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))))
(FPCore (z0 z1) (- (* (pow (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1)) 2) (- 1 (* z0 z0))) (/ (- -1 (* (cos z1) z0)) (- 1 (* z0 z0)))))
(FPCore (z0) (* (- (* 1/2 (cos (+ z0 z0))) -1/2) 11))
(FPCore (z0 z1) (- (- z0 (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)) -1))
(FPCore (z0) (* (- (* 1/2 (cos z0)) -1/2) 11))
(FPCore (z0 z1) (- (- (/ (* -40 (pow (cos z1) 4)) z0) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)) -1))
(FPCore (z0 z1) (/ z0 (- -3/2 (* (cos (+ z1 z1)) 5/2))))
(FPCore (z0 z1 z2) (/ (* (* 1/2 z0) z2) (* (- (* z1 z1) 1) (- (* z1 z1) 1))))
(FPCore (z0 z1) (* 1/2 (/ z0 (* (- (* z1 z1) 1) (- (* z1 z1) 1)))))
(FPCore (z0 z1) (* z0 (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* 11 (- (* 1/2 (cos (+ z1 z1))) -1/2)) 1))))
(FPCore (z0 z1 z2) (* z0 (* (* (cos z2) z1) z1)))
(FPCore (z0) (* (cos (+ z0 z0)) 3/2))
(FPCore (z0 z1 z2) (- z0 (* (- (* (- (cos (+ z2 z2)) -1) (* -1/2 z1)) (cos z2)) 3)))
(FPCore (z0 z1) (- (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 z0)) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)) -1))
(FPCore (z0) (- 1/2 (* (cos (+ z0 z0)) 1/2)))
(FPCore (z0) (* (cos z0) 3/2))
(FPCore (z0) (- 1/2 (* (cos z0) 1/2)))
(FPCore (z0) (* (- (cos (+ z0 z0)) -1) -11/2))
(FPCore (z0 z1 z2) (* z1 (+ (* (pow (cos z2) 3) z1) (sqrt (- 1 z0)))))
(FPCore (z0 z1) (+ (* z1 (+ (* (* (* z0 z0) z0) z1) (sqrt (- 1 (* z1 z1))))) (/ z1 (- (sqrt (- 1 (* z1 z1))) -1))))
(FPCore (z0 z1) (* z1 (+ (* (* (* z0 z0) z0) z1) (sqrt (- 1 (* z1 z1))))))
(FPCore (z0) (pow (cos z0) 6))
(FPCore (z0 z1) (* (* z0 (- 1 (* z1 z1))) (* (- (* z1 z1) 1) (- (* z1 z1) 1))))
(FPCore (z0 z1 z2) (* z1 (+ (* (pow (cos z2) 3) z1) (sqrt z0))))
(FPCore (z0 z1) (- (* (- (cos (+ z1 z1)) -1) -11/2) (+ -1 z0)))
(FPCore (z0 z1) (+ (* z0 (+ (* (pow (cos z1) 3) z0) (sqrt (- 1 (* z0 z0))))) (/ z0 (- (sqrt (- 1 (* z0 z0))) -1))))
(FPCore (z0 z1) (+ (* z1 (+ (sqrt (- 1 (* z1 z1))) (* z0 z1))) (/ z1 (- (sqrt (- 1 (* z1 z1))) -1))))
(FPCore (z0 z1 z2) (+ (* (pow (cos z2) 3) z1) (sqrt z0)))
(FPCore (z0 z1) (* z1 (cos z0)))
(FPCore (z0 z1) (* (* (- 1 (* z1 z1)) z0) (* (- (* z1 z1) 1) (- (* z1 z1) 1))))
(FPCore (z0 z1 z2) (+ (* z1 (+ (* (pow (cos z2) 3) z1) (sqrt (- 1 (* z1 z1))))) (/ z1 (- (sqrt (- 1 z0)) -1))))
(FPCore (z0) (* 200 (pow (cos z0) 4)))
(FPCore (z0 z1) (* z0 (pow (cos z1) 4)))
(FPCore (z0 z1) (* (* (- (* z1 z1) 1) (- (* z1 z1) 1)) (* (- 1 (* z1 z1)) z0)))
(FPCore (z0) (- (* (- (cos (+ z0 z0)) -1) -11/2) -1))
(FPCore (z0 z1 z2) (* z1 (+ (+ (* (pow (cos z2) 3) z1) (sqrt (- 1 (* z1 z1)))) (/ 1 z0))))
(FPCore (z0 z1) (* (* 200 (pow (cos z1) 4)) (pow z0 -2)))
(FPCore (z0 z1) (* (* 200 (pow (cos z1) 4)) z0))
(FPCore (z0 z1) (+ (* (* (* z0 z0) z0) z1) (sqrt (- 1 (* z1 z1)))))
(FPCore (z0) (- (* (- (cos z0) -1) -11/2) -1))
(FPCore (z0 z1) (* (* (* (* (- (* z1 z1) 1) (- (* z1 z1) 1)) (- 1 (* z1 z1))) (- 1 (* z1 z1))) z0))
(FPCore (z0 z1 z2) (+ (* z1 (+ (* (pow (cos z2) 3) z1) (sqrt (- 1 z0)))) (/ z1 (- (sqrt (- 1 (* z1 z1))) -1))))
(FPCore (z0) (* (- (cos z0) -1) -11/2))
(FPCore (z0 z1 z2) (+ (* (pow (cos z2) 3) z1) z0))
(FPCore (z0 z1 z2) (+ (* z1 (+ (* (pow (cos z2) 3) z1) (sqrt z0))) (/ z1 (- (sqrt (- 1 (* z1 z1))) -1))))
(FPCore (z0 z1) (/ z0 (* (* (* (* (- (* z1 z1) 1) (- (* z1 z1) 1)) (- 1 (* z1 z1))) (- 1 (* z1 z1))) (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (+ (* (pow (cos z2) 3) z1) (sqrt (- 1 z0))))
(FPCore (z0) (* (pow (cos z0) 4) 40))
(FPCore (z0 z1) (- (- z0 (* (- (cos (+ z1 z1)) -1) 11/2)) -1))
(FPCore (z0 z1) (/ (* (pow (cos z1) 4) 40) z0))
(FPCore (z0 z1 z2) (* 3 (+ (* z1 (- (* 1/2 (cos z0)) -1/2)) (cos z2))))
(FPCore (z0 z1 z2) (* 3 (+ (* z1 (- (* 1/2 z0) -1/2)) (cos z2))))
(FPCore (z0 z1 z2) (- z0 (* -3 (+ (* z1 (- (* 1/2 (cos (+ z2 z2))) -1/2)) (cos z2)))))
(FPCore (z0 z1) (* 3 (+ (* z0 (- (* 1/2 (cos (+ z1 z1))) -1/2)) (cos z1))))
(FPCore (z0 z1) (+ (* z0 (- (* 1/2 (cos (+ z1 z1))) -1/2)) (cos z1)))
(FPCore (z0 z1 z2) (* (* (* (* z2 z1) 1/2) z0) 1/8))
(FPCore (z0 z1 z2) (* 3 (+ (* z1 z0) (cos z2))))
(FPCore (z0 z1 z2) (* 3 (+ (* z1 (- (* 1/2 (cos (+ z2 z2))) -1/2)) z0)))
(FPCore (z0 z1 z2) (+ (* z1 (- (* 1/2 (cos (+ z2 z2))) -1/2)) z0))
(FPCore (z0 z1 z2) (* 3 (+ (* z1 (- z0 -1/2)) (cos z2))))
(FPCore (z0 z1) (* z1 (- (* 1/2 (cos z0)) -1/2)))
(FPCore (z0 z1) (/ z0 (- 1 (* (- 1/2 (* (cos (+ z1 z1)) -1/2)) 5))))
(FPCore (z0 z1 z2) (+ (* z1 (- (* 1/2 (cos z0)) -1/2)) (cos z2)))
(FPCore (z0) (pow (- -3/2 (* (cos (+ z0 z0)) 5/2)) -2))
(FPCore (z0 z1) (- (* (- (cos (+ z1 z1)) -1) 11/2) (+ 1 z0)))
(FPCore (z0 z1 z2) (* (cos (- z2 (- (* -3 z1) z2))) z0))
(FPCore (z0 z1) (* (cos (+ z1 z1)) (- 1 z0)))
(FPCore (z0 z1 z2) (* (cos (- z2 z0)) z1))
(FPCore (z0 z1 z2) (* (fabs (sin z2)) (/ z0 (* (- (* z1 z1) 1) (- (* z1 z1) 1)))))
(FPCore (z0 z1) (- (* (- (cos (+ z1 z1)) -1) 11/2) (+ 1 (/ (* -40 (pow (cos z1) 4)) (- (* (- -1 (cos z0)) 5/2) -1)))))
(FPCore (z0 z1) (- (- (* (- (cos (+ z1 z1)) -1) 11/2) 1) (/ (* -40 z0) (- (* (- -1 (cos (+ z1 z1))) 5/2) -1))))
(FPCore (z0 z1 z2) (* (* z0 (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* 11 (- (* 1/2 (cos (+ z1 z1))) -1/2)) 1))) (cos (+ z2 z2))))
(FPCore (z0 z1 z2) (+ (* (- (* 1/2 (cos z0)) -1/2) z1) (cos z2)))
(FPCore (z0 z1) (- (- (* (- (cos (+ z1 z1)) -1) 11/2) 1) (/ z0 (- (* (- -1 (cos (+ z1 z1))) 5/2) -1))))
(FPCore (z0 z1) (+ (* (- (* 1/2 (cos (+ z1 z1))) -1/2) z0) (cos z1)))
(FPCore (z0 z1 z2) (* (/ z0 (* (* (* z1 (- (* z2 z2) 1)) z1) (- (* z2 z2) 1))) (* 1/8 z2)))
(FPCore (z0 z1) (- (- (* (- z0 -1) 11/2) 1) (/ (* -40 (pow (cos z1) 4)) (- (* (- -1 (cos (+ z1 z1))) 5/2) -1))))
(FPCore (z0 z1) (- (* (- (cos (+ z1 z1)) -1) 11/2) (+ 1 (/ (* -40 (pow (cos z1) 4)) z0))))
(FPCore (z0 z1 z2) (* (cos (- (+ z2 z2) z0)) z1))
(FPCore (z0 z1) (- (- z0 1) (/ (* -40 (pow (cos z1) 4)) (- (* (- -1 (cos (+ z1 z1))) 5/2) -1))))
(FPCore (z0 z1 z2) (* (fabs (sin z2)) (* (/ z0 (* (- (* z1 z1) 1) (- (* z1 z1) 1))) (* 1/2 (cos z2)))))
(FPCore (z0) (pow (- -3/2 (* z0 5/2)) -2))
(FPCore (z0 z1 z2) (* (* z0 z1) (* (cos (+ z2 z2)) (- 1 (* z1 z1)))))
(FPCore (z0 z1) (- (* (- (cos (+ z1 z1)) -1) 11/2) (+ 1 (/ (* -40 (pow (cos z1) 4)) (- (* z0 5/2) -1)))))
(FPCore (z0 z1) (sin (* 2 (+ z1 z0))))
(FPCore (z0 z1) (- z0 (/ (* -40 (pow (cos z1) 4)) (- (* (- -1 (cos (+ z1 z1))) 5/2) -1))))
(FPCore (z0 z1 z2) (* (cos (+ z2 z0)) z1))
(FPCore (z0 z1) (- (* (- (cos (+ z1 z1)) -1) 11/2) (+ 1 (/ (* -40 (pow (cos z1) 4)) (- z0 -1)))))
(FPCore (z0 z1) (* (- (* 1/2 (cos z0)) -1/2) z1))
(FPCore (z0 z1 z2) (+ (* (- (* 1/2 (cos (+ z2 z2))) -1/2) z1) z0))
(FPCore (z0) (pow (- -3/2 (* (cos z0) 5/2)) -2))
(FPCore (z0 z1) (- (* (- (cos (+ z1 z1)) -1) 11/2) (+ 1 (/ (* -40 (pow (cos z1) 4)) (- (* (- -1 z0) 5/2) -1)))))
(FPCore (z0 z1 z2) (* z0 (* (cos (+ z2 z2)) (- 1 (* z1 z1)))))
(FPCore (z0) (- (- (* (- (cos (+ z0 z0)) -1) 11/2) 1) (/ (* -40 (pow (cos z0) 4)) (- (* (- -1 (cos (+ z0 z0))) 5/2) -1))))
(FPCore (z0 z1) (- (- (* (- (cos z0) -1) 11/2) 1) (/ (* -40 (pow (cos z1) 4)) (- (* (- -1 (cos (+ z1 z1))) 5/2) -1))))
(FPCore (z0 z1) (* z0 (pow (- -3/2 (* (cos (+ z1 z1)) 5/2)) -2)))
(FPCore (z0 z1) (- (- (* (- (cos (+ z1 z1)) -1) 11/2) 1) (/ (* -40 (pow z0 4)) (- (* (- -1 (cos (+ z1 z1))) 5/2) -1))))
(FPCore (z0 z1 z2) (* (cos (+ (+ z2 z2) z1)) z0))
(FPCore (z0 z1) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) z0))
(FPCore (z0 z1) (- (- (* z0 11/2) 1) (/ (* -40 (pow (cos z1) 4)) (- (* (- -1 (cos (+ z1 z1))) 5/2) -1))))
(FPCore (z0 z1) (- (- (/ (* -40 z0) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)) -1))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* (- (* 1/2 (cos z0)) -1/2) 11) 1)))
(FPCore (z0 z1 z2) (* (* (* (* z0 1/8) z1) z1) (* (cos (+ z2 z2)) (- 1 (* z1 z1)))))
(FPCore (z0 z1) (- (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 z0))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)) -1))
(FPCore (z0) (- (- (/ (* -40 (pow (cos z0) 4)) (- -3/2 (* 5/2 (cos (+ z0 z0))))) (* (- (* 1/2 (cos (+ z0 z0))) -1/2) 11)) -1))
(FPCore (z0 z1) (- (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos z0)))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)) -1))
(FPCore (z0 z1) (- (/ z0 (- -3/2 (* 5/2 (cos (+ z1 z1))))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 z0))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)))
(FPCore (z0 z1) (- (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5 z0))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)) -1))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) z0) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)))
(FPCore (z0 z1) (- (- (/ z0 (- -3/2 (* 5/2 (cos (+ z1 z1))))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)) -1))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 z0)) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)))
(FPCore (z0 z1) (- z0 (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)))
(FPCore (z0 z1) (* z0 (- (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)) -1)))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (* (- (* 1/2 (cos z0)) -1/2) 11)))
(FPCore (z0) (- (* (cos z0) 3/2) -1/2))
(FPCore (z0) (- (* (cos (+ z0 z0)) 3/2) -1/2))
(FPCore (z0 z1) (- (/ (* -40 z0) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)))
(FPCore (z0 z1) (- (/ (* -40 (pow z0 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)))
(FPCore (z0) (- (/ (* -40 (pow (cos z0) 4)) (- -3/2 (* 5/2 (cos (+ z0 z0))))) (* (- (* 1/2 (cos (+ z0 z0))) -1/2) 11)))
(FPCore (z0 z1) (- (- (/ (* -40 (pow z0 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)) -1))
(FPCore (z0 z1) (* z0 (- (- (* (- (cos (+ z1 z1)) -1) 11/2) 1) (/ (* -40 (pow (cos z1) 4)) (- (* (- -1 (cos (+ z1 z1))) 5/2) -1)))))
(FPCore (z0 z1 z2) (* (/ z0 (* (* (* z1 (- (* z2 z2) 1)) z1) (- (* z2 z2) 1))) (* 1/8 (* z2 z2))))
(FPCore (z0 z1 z2) (* z0 (cos (* (+ z2 z1) -2))))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* z0 11) 1)))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (* (- z0 -1/2) 11)))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (* (- (* 1/2 z0) -1/2) 11)))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* (- z0 -1/2) 11) 1)))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5 z0))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)))
(FPCore (z0 z1 z2) (/ (* z0 (- (- (* (- (cos (+ z2 z2)) -1) 11/2) 1) (/ (* -40 (pow (cos z2) 4)) (- (* (- -1 (cos (+ z2 z2))) 5/2) -1)))) (* (- 1 (* z1 z1)) (tan z2))))
(FPCore (z0 z1) (* (* (* z0 1/8) z1) z1))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (* z0 11)))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos z0)))) (* (- (* 1/2 (cos (+ z1 z1))) -1/2) 11)))
(FPCore (z0 z1) (- (/ (* -40 (pow (cos z1) 4)) (- -3/2 (* 5/2 (cos (+ z1 z1))))) (- (* (- (* 1/2 z0) -1/2) 11) 1)))
(FPCore (z0 z1) (* (* z0 (- 1/2 (* 1/2 (cos (+ z1 z1))))) 3))
(FPCore (z0 z1) (* (* (/ (- (* z1 z0) -1) (- 1 (* z1 z1))) (/ (- (* z1 z0) -1) (- 1 (* z1 z1)))) (- 1 (* z1 z1))))
(FPCore (z0) (* -200 (pow (cos z0) 4)))
(FPCore (z0 z1) (* (* -200 (pow (cos z1) 4)) (pow z0 -2)))
(FPCore (z0 z1) (/ 1 (* (sqrt z0) (- 1 (* z1 z1)))))
(FPCore (z0 z1) (- z0 (* (* -200 (pow (cos z1) 4)) (pow (- -3/2 (* 5/2 (cos (+ z1 z1)))) -2))))
(FPCore (z0) (- (* 5/2 (cos z0)) -3/2))
(FPCore (z0 z1) (/ z0 (- (* 5/2 (cos (+ z1 z1))) -3/2)))
(FPCore (z0 z1) (/ (* -40 (pow z0 4)) (- (* 5/2 (cos (+ z1 z1))) -3/2)))
(FPCore (z0 z1 z2) (pow (/ (- (* z1 (cos z2)) -1) (- 1 z0)) 2))
(FPCore (z0) (/ (* -40 (pow (cos z0) 4)) (- (* 5/2 (cos (+ z0 z0))) -3/2)))
(FPCore (z0 z1) (/ 1 (* (sqrt (- 1 z0)) (- 1 (* z1 z1)))))
(FPCore (z0 z1) (* (/ z0 (* (- (* z1 z1) 1) (- (* z1 z1) 1))) 1/8))
(FPCore (z0 z1) (* (/ (- (* z1 z0) -1) (- 1 (* z1 z1))) (/ (- (* z1 z0) -1) (- 1 (* z1 z1)))))
(FPCore (z0) (- (* 5/2 (cos (+ z0 z0))) -3/2))
(FPCore (z0 z1 z2) (* (pow (/ (- (* z1 (cos z2)) -1) (- 1 z0)) 2) (- 1 (* z1 z1))))
(FPCore (z0 z1) (* (* -200 (pow (cos z1) 4)) (pow (- -3/2 z0) -2)))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) (- (* 5/2 (cos z0)) -3/2)))
(FPCore (z0 z1 z2) (* (pow (/ (- (* z1 (cos z2)) -1) (- 1 (* z1 z1))) 2) (- 1 z0)))
(FPCore (z0 z1) (pow (/ (- (* z0 (cos z1)) -1) (- 1 (* z0 z0))) 2))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) (- (* 5/2 z0) -3/2)))
(FPCore (z0 z1) (/ (* -40 (pow (cos z1) 4)) (- z0 -3/2)))
(FPCore (z0 z1 z2) (* (pow (/ (- (* z1 (cos z2)) -1) (- 1 (* z1 z1))) 2) z0))
(FPCore (z0 z1) (* (* -200 (pow (cos z1) 4)) z0))
(FPCore (z0 z1) (- (- z0 -1) (/ (* -40 (pow (cos z1) 4)) (- (* 5/2 (cos (+ z1 z1))) -3/2))))
(FPCore (z0 z1) (- z0 (/ (* -40 (pow (cos z1) 4)) (- (* 5/2 (cos (+ z1 z1))) -3/2))))
(FPCore (z0 z1 z2) (pow (/ (- (* z1 (cos z2)) -1) z0) 2))
(FPCore (z0 z1) (/ (* -40 z0) (- (* 5/2 (cos (+ z1 z1))) -3/2)))
(FPCore (z0 z1) (* (pow (/ (- (* z0 (cos z1)) -1) (- 1 (* z0 z0))) 2) (- 1 (* z0 z0))))
(FPCore (z0 z1 z2) (* (pow (/ (- (* z1 (cos z2)) -1) z0) 2) (- 1 (* z1 z1))))
(FPCore (z0) (* -200 (pow z0 4)))
(FPCore (z0 z1 z2) (* (sin (+ (+ z2 z2) z1)) (- z0 -1)))
(FPCore (z0 z1) (- (- (* (- (cos (+ z1 z1)) -1) -11/2) -1) (/ z0 (- (* 5/2 (cos (+ z1 z1))) -3/2))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) z0) 2) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1) (- (* (- (cos (+ z1 z1)) -1) -11/2) (+ -1 (/ (* -40 (pow (cos z1) 4)) z0))))
(FPCore (z0 z1 z2) (- (* (* z0 z0) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1) (- (- (* (- (cos (+ z1 z1)) -1) -11/2) -1) (/ (* -40 z0) (- (* 5/2 (cos (+ z1 z1))) -3/2))))
(FPCore (z0 z1 z2) (* (- (* (- (cos (+ z2 z2)) -1) (* -1/2 z1)) z0) 3))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- z0 1)) 2) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1 z2) (- (- (* (* z0 z0) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))) -1))
(FPCore (z0) (pow (- 1 (* z0 5)) -2))
(FPCore (z0 z1 z2) (+ (cos (* (+ z2 z1) -2)) z0))
(FPCore (z0 z1) (- (- (* z0 -11/2) -1) (/ (* -40 (pow (cos z1) 4)) (- (* 5/2 (cos (+ z1 z1))) -3/2))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- z0 1)) 2) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 1)))
(FPCore (z0 z1 z2) (* (sin z0) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 1))))
(FPCore (z0 z1 z2) (- (* z0 (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1 z2) (+ (* (cos (- z2 (- (* -3 z1) z2))) z0) (* (+ (cos (* (+ z2 z1) -2)) (* (cos (+ (+ z2 z2) z1)) z0)) 3)))
(FPCore (z0 z1) (- (- (* (- z0 -1) -11/2) -1) (/ (* -40 (pow (cos z1) 4)) (- (* 5/2 (cos (+ z1 z1))) -3/2))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) z0) (- (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 1)))
(FPCore (z0) (* (sin z0) 3))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- z0 1))))
(FPCore (z0 z1 z2) (- (* (* (/ z0 (- 1 (* z1 z1))) (/ z0 (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1) (- (* (- (cos (+ z1 z1)) -1) -11/2) (+ -1 (/ (* -40 (pow (cos z1) 4)) (- (* 5/2 (cos z0)) -3/2)))))
(FPCore (z0 z1) (- (* (- (cos (+ z1 z1)) -1) -11/2) (+ -1 (/ (* -40 (pow (cos z1) 4)) (- (* 5/2 z0) -3/2)))))
(FPCore (z0 z1) (- (- (* (- (cos z0) -1) -11/2) -1) (/ (* -40 (pow (cos z1) 4)) (- (* 5/2 (cos (+ z1 z1))) -3/2))))
(FPCore (z0 z1 z2) (* (- (* (* z0 -1/2) z1) (cos z2)) 3))
(FPCore (z0 z1 z2) (- (* (* (/ (- -1 z0) (- 1 (* z1 z1))) (/ (- -1 z0) (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 1)))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (/ z0 (- (* z1 z1) 1))))
(FPCore (z0 z1) (- (* (pow (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1)) 2) (- 1 (* z0 z0))) (- (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1)) 1)))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ z0 (- (* z1 z1) 1)) 1)))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 z0)) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1 z2) (- (- (* (* (/ z0 (- 1 (* z1 z1))) (/ z0 (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))) -1))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) z0) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1 z2) (- (* (* (/ (- -1 (* z0 z1)) (- 1 (* z1 z1))) (/ (- -1 (* z0 z1)) (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1 z2) (* (- (* (* (- (cos z0) -1) -1/2) z1) (cos z2)) 3))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ (- z0 -1) (- 1 (* z1 z1))) 1)))
(FPCore (z0 z1 z2) (- (- z0 (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))) -1))
(FPCore (z0 z1) (* (- (* (- (cos (+ z1 z1)) -1) (* -1/2 z0)) (cos z1)) 3))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (/ (- -1 (* z0 z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1 z2) (+ (sin (* 2 (+ z2 z1))) z0))
(FPCore (z0 z1 z2) (* (sin (+ (+ z2 z2) z1)) (- (* (pow (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1)) 2) (- 1 (* z0 z0))) (- (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1)) 1))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (/ (- z0 -1) (- 1 (* z1 z1)))))
(FPCore (z0 z1 z2) (- (* (* (/ (- -1 (* z0 z1)) (- 1 (* z1 z1))) (/ (- -1 (* z0 z1)) (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 1)))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ (- -1 (* z0 z1)) (- (* z1 z1) 1)) 1)))
(FPCore (z0 z1 z2) (- (- (* (pow (/ (- -1 (* (cos z2) z1)) z0) 2) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))) -1))
(FPCore (z0 z1) (* (- (cos z1) z0) -3))
(FPCore (z0 z1 z2) (* (- (* (* (- z0 -1) -1/2) z1) (cos z2)) 3))
(FPCore (z0) (- (- (* (- (cos (+ z0 z0)) -1) -11/2) -1) (/ (* -40 (pow (cos z0) 4)) (- (* 5/2 (cos (+ z0 z0))) -3/2))))
(FPCore (z0 z1) (- (* (pow (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1)) 2) (- 1 (* z0 z0))) (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1))))
(FPCore (z0 z1) (* (* (- 1 (* z1 z1)) -1/2) z0))
(FPCore (z0 z1) (- (* (- (cos (+ z1 z1)) -1) -11/2) (+ -1 (/ (* -40 (pow (cos z1) 4)) (- z0 -3/2)))))
(FPCore (z0 z1 z2) (- (- (* z0 (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))) -1))
(FPCore (z0 z1 z2) (* (+ (cos (* (+ z2 z1) -2)) (* (cos (+ (+ z2 z2) z1)) z0)) 3))
(FPCore (z0 z1 z2) (- z0 (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1 z2) (* z0 (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 1))))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) (- z0 1)) 1)))
(FPCore (z0 z1 z2) (* (- (* z0 z1) (cos z2)) 3))
(FPCore (z0 z1 z2) (- (* (* (/ (- -1 z0) (- 1 (* z1 z1))) (/ (- -1 z0) (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1))))
(FPCore (z0 z1) (- (- (* (- (cos (+ z1 z1)) -1) -11/2) -1) (/ (* -40 (pow z0 4)) (- (* 5/2 (cos (+ z1 z1))) -3/2))))
(FPCore (z0 z1 z2) (+ (cos (* (+ z2 z1) -2)) (* (cos (+ (+ z2 z2) z1)) z0)))
(FPCore (z0 z1 z2) (* (+ (cos (* (+ z2 z1) -2)) z0) 3))
(FPCore (z0 z1 z2) (- (- (* (pow (/ (- -1 (* (cos z2) z1)) z0) 2) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))) -1))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ (- -1 z0) (- 1 (* z1 z1))) 1)))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) (- 1 z0)) 1)))
(FPCore (z0 z1 z2) (- (- (* z0 (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))) -1))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- z0 1)) 2) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1))) 1)))
(FPCore (z0 z1 z2) (* 3 (+ (sin (* 2 (+ z2 z1))) z0)))
(FPCore (z0) (* 80 (- (* 1/2 (cos z0)) -1/2)))
(FPCore (z0 z1 z2) (- (* (* (/ (- -1 z0) (- 1 (* z1 z1))) (/ (- -1 z0) (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1))) 1)))
(FPCore (z0 z1) (- (* (pow (/ (- -1 (* (cos z1) z0)) (- (* z0 z0) 1)) 2) (- 1 (* z0 z0))) (- (/ (- -1 (* (cos z1) z0)) (- 1 (* z0 z0))) 1)))
(FPCore (z0 z1) (* (* -500 z0) z1))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ (- -1 (* z0 z1)) (- 1 (* z1 z1))) 1)))
(FPCore (z0 z1 z2) (- (- (* (* (/ z0 (- 1 (* z1 z1))) (/ z0 (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))) -1))
(FPCore (z0 z1) (/ (* 80 (- (* 1/2 (cos (+ z1 z1))) -1/2)) (- -3/2 z0)))
(FPCore (z0 z1 z2) (* z1 (sin (- (+ z2 z2) z0))))
(FPCore (z0 z1 z2) (* z1 (sin (- z0 (* -3 z2)))))
(FPCore (z0 z1 z2) (- (- (* (* z0 z0) (- 1 (* z1 z1))) (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1)))) -1))
(FPCore (z0 z1 z2) (* (* z0 (- 1 (* z1 z1))) (- (/ (* -40 (pow (cos z2) 4)) (- -3/2 (* 5/2 (cos (+ z2 z2))))) (- (* 11 (- (* 1/2 (cos (+ z2 z2))) -1/2)) 1))))
(FPCore (z0 z1 z2) (* (* z0 (- 1 (* z2 z2))) z1))
(FPCore (z0 z1) (/ (* 80 (- (* 1/2 (cos (+ z1 z1))) -1/2)) z0))
(FPCore (z0 z1 z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ z0 (- 1 (* z1 z1))) 1)))
(FPCore (z0 z1 z2) (- (* (* (/ (- -1 (* z0 z1)) (- 1 (* z1 z1))) (/ (- -1 (* z0 z1)) (- 1 (* z1 z1)))) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1))) 1)))
(FPCore (z0 z1 z2) (* (* (sin z2) (- (* (pow (/ (- -1 (* (cos z2) z1)) (- (* z1 z1) 1)) 2) (- 1 (* z1 z1))) (- (/ (- -1 (* (cos z2) z1)) (- 1 (* z1 z1))) 1))) (+ z0 z0)))
(FPCore (z0) (* 80 (- (* 1/2 (cos (+ z0 z0))) -1/2)))
(FPCore (z0) (* (pow (cos z0) 6) 400))
(FPCore (z0 z1) (* (* (pow z0 6) 400) z1))
(FPCore (z0 z1) (* (* 200 (pow (cos z1) 4)) (pow (- -3/2 z0) -2)))
(FPCore (z0 z1) (* (* (* (pow z0 6) 400) z1) z1))
(FPCore (z0 z1) (* (* (* z0 400) z1) z1))
(FPCore (z0 z1) (* (* z0 400) z1))
(FPCore (z0 z1) (* z0 (* z1 (- 1 (* z1 z1)))))
(FPCore (z0 z1) (* (* 3 z1) z0))