(FPCore (z1) (cos (- -1 z1)))
(FPCore (z1) (* (sin z1) z1))
(FPCore (z1) (tan (* (+ PI (- z1 -1)) 1/4)))
(FPCore (z1) (tan (- (* 29/4 PI) (* -1/2 z1))))
(FPCore (z1) (- (cos (- -1 z1)) 1))
(FPCore (z1) (- 1 (* (- 1 (cos (- -1 z1))) (* -1/2 z1))))
(FPCore (z1) (log (tan (* (+ PI (- z1 -1)) 1/4))))
(FPCore (z1) (log (tan (- (* 29/4 PI) (* -1/2 z1)))))
(FPCore (z1) (* (- 1 (cos (- -1 z1))) (* -1/2 z1)))
(FPCore (z1) (* (- (cos (- -1 z1)) 1) z1))
(FPCore (z1) (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) 1))
(FPCore (z1) (log (/ (- (* (sin z1) z1) -1) (- 1 (* (sin z1) z1)))))
(FPCore (z1) (- (* (sin z1) z1) -1))
(FPCore (z1) (- 1 (* (sin z1) z1)))
(FPCore (z1) (- (* (- 1 (cos (- -1 z1))) z1) -2))
(FPCore (z1 z2) (* (log (/ (- -1 (* (sin z2) z1)) (- (* (sin z2) z1) 1))) z1))
(FPCore (z1) (- 1 (cos (- -1 z1))))
(FPCore (z1 z2) (log (* (pow (/ (- -1 (* (sin z2) z1)) (- (* (sin z2) z1) 1)) (- z1)) (tan (- (* 21/4 PI) (* -1/2 z2))))))
(FPCore (z1) (* (log (tan (* (+ PI (- z1 -1)) 1/4))) z1))
(FPCore (z1) (tan (* (- PI (- z1 -1)) 1/4)))
(FPCore (z1) (* (- 1 (cos (- -1 z1))) (* 1/2 z1)))
(FPCore (z1) (- -1 (* (sin z1) z1)))
(FPCore (z1) (- (* (sin z1) z1) 1))
(FPCore (z1 z2) (* (* z1 z2) z1))
(FPCore (z1 z2) (* (- 1 (* (* 1/2 z2) (- (cos (- -1 z1)) 1))) (- 1 (* (- 1 (cos (- -1 z1))) (* -1/2 z1)))))
(FPCore (z1) (pow (tan (* (+ PI (- z1 -1)) 1/4)) (- z1)))
(FPCore (z1) (* (log (tan (* (- PI (- z1 -1)) 1/4))) z1))
(FPCore (z1) (cos (* -1/4 (+ PI (- z1 -1)))))
(FPCore (z1) (pow (/ (- (* (sin z1) z1) -1) (- 1 (* (sin z1) z1))) (* 1/2 z1)))
(FPCore (z1) (sin (* 3 z1)))
(FPCore (z1) (log (tan (* (- PI (- z1 -1)) 1/4))))
(FPCore (z1) (* (sin (* 3 z1)) z1))
(FPCore (z1) (- z1 (log (tan (- (* 29/4 PI) (* -1/2 z1))))))
(FPCore (z1) (* (tan (* (- PI (- z1 -1)) 1/4)) (pow (/ (- (* (sin z1) z1) -1) (- 1 (* (sin z1) z1))) (* 1/2 z1))))
(FPCore (z1) (sin (* -1/4 (+ PI (- z1 -1)))))
(FPCore (z1 z2) (/ (- z1 (log (tan (- (* 29/4 PI) (* -1/2 z2))))) z1))
(FPCore (z1 z2) (+ (* (sin (* 3 z2)) z1) (* (sin z2) z1)))
(FPCore (z1 z2) (cos (+ (/ z2 z1) z1)))
(FPCore (z1) (* (sin (- z1 -1)) z1))
(FPCore (z1) (* (- 1 (cos (- -1 z1))) -1/2))
(FPCore (z1 z2) (sqrt (/ (- (* (- (cos (- -1 z1)) 1) z1) 2) (- (* (- (cos (- -1 z1)) 1) z2) 2))))
(FPCore (z1) (- (* (- (cos (- -1 z1)) 1) z1) 2))
(FPCore (z1 z2) (* (- 1 (* (* 1/2 z2) (- (cos (- -1 z1)) 1))) (pow (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) 1) -2)))
(FPCore (z1) (pow (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) 1) -2))
(FPCore (z1 z2) (/ (- (* (- (cos (- -1 z1)) 1) z1) 2) (- (* (- (cos (- -1 z1)) 1) z2) 2)))
(FPCore (z1) (sin (- z1 -1)))
(FPCore (z1) (sin (* (+ PI (- z1 -1)) 1/4)))
(FPCore (z1) (pow (tan (* (+ PI (- z1 -1)) 1/4)) z1))
(FPCore (z1) (* (sin (* 4 z1)) (- z1)))
(FPCore (z1) (* 3 (* z1 z1)))
(FPCore (z1 z2) (- z2 (* (sin (- z1 -1)) z1)))
(FPCore (z1) (* (cos z1) z1))
(FPCore (z1) (* (tan (* (+ PI (- z1 -1)) 1/4)) z1))
(FPCore (z1) (- (cos (- -1 z1)) -1))
(FPCore (z1) (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) -1))
(FPCore (z1) (pow (cos z1) 4))
(FPCore (z1) (cos (* z1 z1)))
(FPCore (z1) (pow (tan (- (* 29/4 PI) (* -1/2 z1))) (- z1)))
(FPCore (z1) (/ z1 (cos z1)))
(FPCore (z1) (* (- -1 (cos (- -1 z1))) -1/2))
(FPCore (z2) (sqrt (- (* z2 z2) 1)))
(FPCore (z1) (* (* (* -1/2 z1) z1) (- 1 (cos (- -1 z1)))))
(FPCore (z1 z2) (* (* (* (* (* z1 z2) z1) z2) z1) (- 2 z1)))
(FPCore (z1) (* (- 1 (cos (- -1 z1))) 1/2))
(FPCore (z1) (sqrt (* 2 (* z1 z1))))
(FPCore (z1) (- (* (* (* -1/2 z1) z1) (- 1 (cos (- -1 z1)))) -1))
(FPCore (z1) (tan (* -1/4 (+ PI (- z1 -1)))))
(FPCore (z1) (pow (tan (- (* 29/4 PI) (* -1/2 z1))) z1))
(FPCore (z1) (fabs (tan (* -1/4 (+ PI (- z1 -1))))))
(FPCore (z1) (* (sin (- z1 -1)) 1/2))
(FPCore (z1) (sin (* (- (- z1 -1) PI) 1/4)))
(FPCore (z1 z2) (* (pow (tan (* 1/4 (+ (+ z2 z2) PI))) (- z1)) z1))
(FPCore (z1) (* (* 6 z1) z1))
(FPCore (z1) (- (* 3 (* z1 z1)) (* z1 z1)))
(FPCore (z1) (sqrt (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) -1)))
(FPCore (z1) (sqrt (- (* z1 z1) -1)))
(FPCore (z1) (- (* (* 6 z1) z1) (* z1 z1)))
(FPCore (z1 z2) (sin (+ (/ z2 z1) z1)))
(FPCore (z1) (* (tan z1) z1))
(FPCore (z1) (* 149230739/1250000000000000 z1))
(FPCore (z1) (- (* z1 z1) (* 3 (* z1 z1))))
(FPCore (z1) (- (+ (- (- (* -4165541759/500000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))) (* (* -212097503/125000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1)))) 0) (- (* 149230739/1250000000000000 z1) -9827991/390625000)) (* z1 (+ (- (* -4616990181/250000000000000000000 z1) -4668270147/10000000000000000) (* 881662847/200000000000000000000000000 (- (* 3 (* z1 z1)) (* z1 z1)))))))
(FPCore (z1) (* (* -212097503/125000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))))
(FPCore (z1) (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1))))
(FPCore (z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))
(FPCore (z1) (* 212097503/125000000000000000000000000 z1))
(FPCore (z1 z2) (* (* (pow (tan (* 1/4 (+ (+ z2 z2) PI))) (- z1)) z1) (pow (tan (- (* 9/4 PI) -27401669256311/40000000000000)) z1)))
(FPCore (z1 z2) (* (pow (/ (- -1 (* (sin z2) z1)) (- (* (sin z2) z1) 1)) (- z1)) (tan (- (* 21/4 PI) (* -1/2 z2)))))
(FPCore (z1 z2) (pow (/ (- -1 (* (sin z2) z1)) (- (* (sin z2) z1) 1)) (- z1)))
(FPCore (z1 z2) (/ (- z1 (log (tan (* 1/4 (+ (+ z2 z2) PI))))) z1))
(FPCore (z1) (- z1 (log (tan (* (- PI (- z1 -1)) 1/4)))))
(FPCore (z1) (log (/ (- -1 z1) (- 1 z1))))
(FPCore (z1) (* (log (/ (- -1 z1) (- 1 z1))) z1))
(FPCore (z1) (* (pow (cos z1) 4) z1))
(FPCore (z1) (- z1 (log (tan (* (+ PI (- z1 -1)) 1/4)))))
(FPCore (z1 z2) (* (* (sin z2) z1) z1))
(FPCore (z1 z2) (/ (* z1 z2) (sqrt (+ (* z2 z2) (* z1 z1)))))
(FPCore (z1) (sin (* z1 z1)))
(FPCore (z1 z2) (* (* (sin (- z1 -1)) 1/2) z2))
(FPCore (z1) (- (pow (cos z1) 4) (* (- 1 (cos (- -1 z1))) -1/2)))
(FPCore (z1) (/ (* (- -1 (cos (- -1 z1))) -1/2) (sqrt (- 1 (* (- (cos (- -1 z1)) 1) (* (- -1 (cos (- -1 z1))) 1/4))))))
(FPCore (z1) (/ z1 (tan 27401669256311/20000000000000)))
(FPCore (z1 z2) (* (sin (* z1 z2)) z1))
(FPCore (z1) (* (tan (- (* 29/4 PI) (* -1/2 z1))) z1))
(FPCore (z1 z2) (* (- (* z2 z2) 1) (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) 1)))
(FPCore (z1 z2) (* (* (- 2 z1) z1) z2))
(FPCore (z2) (- (sqrt (- (* z2 z2) 1))))
(FPCore (z1) (sqrt (- (pow (cos z1) 4) (* (- 1 (cos (- -1 z1))) -1/2))))
(FPCore (z1) (* (pow (tan (- (* 9/4 PI) -27401669256311/40000000000000)) z1) (pow (tan (* (+ PI (- z1 -1)) 1/4)) (- z1))))
(FPCore (z1) (- 1 (* (- (cos (- -1 z1)) 1) (* (- -1 (cos (- -1 z1))) 1/4))))
(FPCore (z1) (* (- (cos (- -1 z1)) 1) (* (- -1 (cos (- -1 z1))) 1/4)))
(FPCore (z1) (* (- (* (* (* -1/2 z1) z1) (- 1 (cos (- -1 z1)))) -1) (cos z1)))
(FPCore (z1) (sqrt (- 1 (* (- (cos (- -1 z1)) 1) (* (- -1 (cos (- -1 z1))) 1/4)))))
(FPCore (z1) (/ (cos z1) (sqrt (- 1 (* (- (cos (- -1 z1)) 1) (* (- -1 (cos (- -1 z1))) 1/4))))))
(FPCore (z1) (* (/ z1 (tan 27401669256311/20000000000000)) z1))
(FPCore (z1) (* (- 4668270147/10000000000000000 (* 304747143/100000000000000000000 z1)) z1))
(FPCore (z1) (* -4668270147/10000000000000000 z1))
(FPCore (z1) (* -4165541759/500000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))))
(FPCore (z1) (- (* 149230739/1250000000000000 z1) -2946529277/100000000000))
(FPCore (z1) (* (* -881662847/200000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))))
(FPCore (z1) (pow (tan (- (* 29/4 PI) (* -1/2 z1))) (/ 1 z1)))
(FPCore (z1) (* (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) -1) z1))
(FPCore (z1) (* -4165541759/125000000000000000000000000000000 (* z1 z1)))
(FPCore (z1) (- (+ (* 4165541759/500000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))) (* (* -212097503/125000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1)))) 0))
(FPCore (z1) (- (* z1 (+ (- 4668270147/10000000000000000 (* 304747143/100000000000000000000 z1)) (* -881662847/200000000000000000000000000 (- (* 3 (* z1 z1)) (* z1 z1))))) (- (- (* 3689471323/1000000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))) 0) (- (* (* -212097503/125000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))) (- -2946529277/100000000000 (* 149230739/1250000000000000 z1))))))
(FPCore (z1) (sqrt (/ (+ (* (pow (cos z1) 4) z1) z1) (* (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) -1) z1))))
(FPCore (z1) (* (* 881662847/200000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))))
(FPCore (z1 z2) (* (/ z1 (cos z1)) z2))
(FPCore (z1) (* 3689471323/250000000000000000000000000000000 (* z1 z1)))
(FPCore (z1) (- (* 149230739/1250000000000000 z1) -9827991/390625000))
(FPCore (z1) (/ (+ (* (pow (cos z1) 4) z1) z1) (* (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) -1) z1)))
(FPCore (z1) (+ (* (pow (cos z1) 4) z1) z1))
(FPCore (z1) (* -881662847/200000000000000000000000000 z1))
(FPCore (z1 z2) (fabs (* (pow (/ (- -1 (* (sin z2) z1)) (- (* (sin z2) z1) 1)) (- z1)) (tan (- (* 21/4 PI) (* -1/2 z2))))))
(FPCore (z1) (- (* (* -212097503/125000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))) 0))
(FPCore (z1) (* 881662847/200000000000000000000000000 z1))
(FPCore (z1) (* (tan z1) (cos z1)))
(FPCore (z1) (* (* (cos z1) (sin (- z1 -1))) 1/2))
(FPCore (z1) (pow (tan (* (+ PI (- z1 -1)) 1/4)) (/ 1 z1)))
(FPCore (z1) (fabs (tan (* (- (- z1 -1) PI) 1/4))))
(FPCore (z1) (* (sin (* 4 z1)) z1))
(FPCore (z1) (- -2946529277/100000000000 (* 149230739/1250000000000000 z1)))
(FPCore (z1) (* (pow (tan (- (* 9/4 PI) -27401669256311/40000000000000)) z1) (pow (tan (- (* 29/4 PI) (* -1/2 z1))) (- z1))))
(FPCore (z1) (- (- 9827991/390625000 (* z1 (+ -149230739/1250000000000000 (* -4616990181/250000000000000000000 z1)))) (* z1 (+ 4668270147/10000000000000000 (* 881662847/200000000000000000000000000 (- (* 3 (* z1 z1)) (* z1 z1)))))))
(FPCore (z1) (tan (- (* -1/2 z1) (* PI -29/4))))
(FPCore (z1) (* -4616990181/250000000000000000000 (* z1 z1)))
(FPCore (z1 z2) (* (- (* (* (- -1 z2) z1) z1) -1) (cos z1)))
(FPCore (z1 z2) (asin (+ (* (* (cos z1) (sin (- z1 -1))) 1/2) (* (+ (sin (+ z2 z2)) 0) 1/2))))
(FPCore (z1 z2) (/ z1 (sqrt (+ (* z2 z2) (* z1 z1)))))
(FPCore (z1) (/ (* (sin (- z1 -1)) 1/2) (sqrt (- (pow (cos z1) 4) (* (- 1 (cos (- -1 z1))) -1/2)))))
(FPCore (z1 z2) (/ (* (- z1 z2) z1) (+ (* z1 z1) (* z1 z2))))
(FPCore (z1 z2) (+ (* (* (cos z1) (sin (- z1 -1))) 1/2) (* (+ (sin (+ z2 z2)) 0) 1/2)))
(FPCore (z1 z2) (+ (* (sin (+ z2 z2)) z1) (* z1 z2)))
(FPCore (z1) (- 0 (* (* 881662847/200000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1)))))
(FPCore (z1) (* z1 (+ 4668270147/10000000000000000 (* -4616990181/250000000000000000000 z1))))
(FPCore (z1 z2) (+ (* z1 z1) (* z1 z2)))
(FPCore (z1) (* -3689471323/1000000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))))
(FPCore (z1 z2) (/ (* z1 z1) (sqrt (+ (* z2 z2) (* z1 z1)))))
(FPCore (z1) (* (- (cos (- -1 z1)) 1) 2))
(FPCore (z1 z2) (* (* (pow (tan (- (* 9/4 PI) -27401669256311/40000000000000)) z1) z1) (pow (tan (- (* 29/4 PI) (* -1/2 z2))) (- z1))))
(FPCore (z1 z2) (* (tan (- (* 21/4 PI) (* -1/2 z2))) (pow (tan (- (* 29/4 PI) (* -1/2 z1))) (- z1))))
(FPCore (z1) (- (* (* -212097503/125000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))) (- -2946529277/100000000000 (* 149230739/1250000000000000 z1))))
(FPCore (z1 z2) (* (* (* z1 z2) z1) z1))
(FPCore (z1 z2) (+ (* (* z2 z2) z1) (* z1 z1)))
(FPCore (z1 z2) (* (pow (tan (* 1/4 (+ (+ z2 z2) PI))) (/ 1 z1)) (pow z1 (/ -1 z1))))
(FPCore (z1) (- (+ (- (* 3689471323/1000000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))) 0) (* (* -212097503/125000000000000000000000000 z1) (- (* z1 z1) (* 3 (* z1 z1))))) (* (* -881662847/200000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1)))))
(FPCore (z1) (asin (* (tan z1) (cos z1))))
(FPCore (z1) (atan2 (sin z1) (sqrt (- (pow (sinh z1) 2) (* -1/2 (- (cos (- -1 z1)) -1))))))
(FPCore (z1 z2) (tan (* (- (if (< (- z1 z2) (- PI)) (+ (+ PI PI) z2) (if (> (- z1 z2) PI) (- z2 (+ PI PI)) z2)) z1) (* 1/2 z1))))
(FPCore (z1 z2) (* (* z2 (- (cos (- -1 z1)) -1)) 1/2))
(FPCore () (* -1/2 (+ PI (* (atan E) -4))))
(FPCore (z1 z2) (/ (sqrt (- (* z2 z2) 1)) (cos z1)))
(FPCore (z1) (* (pow (/ (- (* (sin z1) z1) -1) (- 1 (* (sin z1) z1))) (* 1/2 z1)) (cos z1)))
(FPCore (z1) (- -1 (cos (- -1 z1))))
(FPCore (z1 z2) (* (- (* (- -3 (* (- (cos (- -1 z1)) 1) 2)) z1) z1) (sin z2)))
(FPCore (z1) (- (sin z1) -1))
(FPCore (z1) (* (* (- (cos (- -1 z1)) -1) (- (cos (- -1 z1)) -1)) 1/2))
(FPCore (z1 z2) (asin (/ z2 (sqrt (+ (* (* z2 z2) z1) (* z1 z1))))))
(FPCore (z1 z2) (* (- (* (* z1 z1) z1) 1) z2))
(FPCore (z1) (- (pow (cos z1) 4) -1))
(FPCore (z1) (/ 2 (sqrt (- (pow (cos z1) 4) (* (- 1 (cos (- -1 z1))) -1/2)))))
(FPCore (z1 z2) (sqrt (- (* (pow (cos z1) 4) (* z1 z2)) -1)))
(FPCore (z1) (/ (pow (cos z1) 4) z1))
(FPCore (z1 z2) (sqrt (+ (* (* z2 z2) z1) (* z1 z1))))
(FPCore (z1 z2) (/ z2 (sqrt (+ (* (* z2 z2) z1) (* z1 z1)))))
(FPCore (z1 z2) (* (atan (/ (sqrt (- (* z2 z2) 1)) (cos z1))) z1))
(FPCore (z1) (* (- (pow (cos z1) 4) (* (- 1 (cos (- -1 z1))) -1/2)) 2))
(FPCore (z1 z2) (* (fabs (atan (/ (sqrt (- (* z2 z2) 1)) (cos z1)))) z1))
(FPCore (z1) (- (- 1 (* (- (pow (cos z1) 4) (* (- 1 (cos (- -1 z1))) -1/2)) 2))))
(FPCore (z1) (+ (log (tan (- (* 29/4 PI) (* -1/2 z1)))) z1))
(FPCore (z1) (- (* (- -3 (* (- (cos (- -1 z1)) 1) 2)) z1) z1))
(FPCore (z1) (/ (cos z1) (sqrt (- (pow (cos z1) 4) (* (- 1 (cos (- -1 z1))) -1/2)))))
(FPCore (z1 z2) (* (pow (cos z1) 4) (* z1 z2)))
(FPCore (z1) (* (log (tan (- (* -1/2 z1) (* PI -29/4)))) z1))
(FPCore (z1) (- -3 (* (- (cos (- -1 z1)) 1) 2)))
(FPCore (z1) (+ (* -3689471323/1000000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))) (- 0 (* (* 881662847/200000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))))))
(FPCore (z1 z2) (- (* (tan z1) (cos z1)) (* (sin z2) z1)))
(FPCore (z1) (log (tan (- (* -1/2 z1) (* PI -29/4)))))
(FPCore (z1 z2) (- (* (pow (cos z1) 4) (* z1 z2)) -1))
(FPCore (z1) (* -1/2 (- (cos (- -1 z1)) -1)))
(FPCore (z1) (* (- -3 (* (- (cos (- -1 z1)) 1) 2)) z1))
(FPCore (z1) (/ (sin z1) z1))
(FPCore (z1) (- (* z1 (+ (- 4668270147/10000000000000000 (* 304747143/100000000000000000000 z1)) (* -881662847/200000000000000000000000000 (- (* 3 (* z1 z1)) (* z1 z1))))) (- (* 3689471323/1000000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))) 0)))
(FPCore (z1 z2) (* (* (* (- 2 z1) z2) z2) z1))
(FPCore (z1) (* -212097503/125000000000000000000000000 z1))
(FPCore (z1) (- (* (- (cos (- -1 z1)) 1) 2) -3))
(FPCore (z1) (- (* 3689471323/1000000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))) 0))
(FPCore (z1) (* (* -212097503/125000000000000000000000000 z1) (- (* z1 z1) (* 3 (* z1 z1)))))
(FPCore (z1) (* (- (* (- (cos (- -1 z1)) 1) 2) -3) (* (sin z1) z1)))
(FPCore (z1) (/ (sin z1) (sqrt (- (pow (cos z1) 4) (* (- 1 (cos (- -1 z1))) -1/2)))))
(FPCore (z1 z2) (/ (* (- z2 z1) z1) (sqrt (+ (* z2 z2) (* z1 z1)))))
(FPCore (z1) (sqrt (- (* (pow (cos z1) 4) (/ z1 (- 1 z1))) -1)))
(FPCore (z1 z2) (* (* (* z2 z2) (- (* (* z1 z1) z1) 1)) (- (* (* z1 z1) z1) 1)))
(FPCore (z1 z2) (* (pow (/ (sin (- (* -1/2 z2) (* -3/4 PI))) (cos (* -1/4 (+ (+ z2 z2) PI)))) (- z1)) z1))
(FPCore (z1 z2) (- (* (atan (* (tan (- (* 9/4 PI) -27401669256311/40000000000000)) (pow (/ z2 z1) (/ 1 z1)))) 2) (* PI 1/2)))
(FPCore (z1) (* (* (* (* -3689471323/1000000000000000000000000000000000 z1) z1) z1) z1))
(FPCore (z1 z2) (/ (+ z1 z2) (sqrt (+ (* z2 z2) (* z1 z1)))))
(FPCore (z1) (/ z1 (tan (- (* PI 4) -27401669256311/20000000000000))))
(FPCore (z1 z2) (* (* (* (- 2 z1) z1) z2) z1))
(FPCore (z1 z2) (- (* (* (* z2 z2) (- (* (* z1 z1) z1) 1)) (- (* (* z1 z1) z1) 1)) 1))
(FPCore (z1) (/ (* (cos z1) z1) (sqrt (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) -1))))
(FPCore (z1 z2) (pow (/ (- -1 (* (sin z2) z1)) (- (* (sin z2) z1) 1)) z1))
(FPCore (z1) (* z1 (- (* 4616990181/250000000000000000000 z1) 4668270147/10000000000000000)))
(FPCore (z1 z2) (* (sqrt (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) -1)) z2))
(FPCore (z1 z2) (* (atan (* (tan (- (* 9/4 PI) -27401669256311/40000000000000)) (pow (/ z2 z1) (/ 1 z1)))) 2))
(FPCore (z1) (* (pow (cos z1) 4) (/ z1 (- 1 z1))))
(FPCore (z1) (- (* (* (* (* -3689471323/1000000000000000000000000000000000 z1) z1) z1) z1) 0))
(FPCore (z1 z2) (* (sin (* z1 z1)) z2))
(FPCore (z1) (- (+ (* (* 881662847/200000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))) (* 3689471323/1000000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1))))) 0))
(FPCore (z1) (+ (- (* (* -881662847/200000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))) (* (* -212097503/125000000000000000000000000 z1) (- (* z1 z1) (* 3 (* z1 z1))))) (* -3689471323/1000000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1))))))
(FPCore (z1) (* (* -3689471323/1000000000000000000000000000000000 z1) z1))
(FPCore (z1) (/ (sqrt (- 1 z1)) (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) -1)))
(FPCore (z1) (- (* (* -881662847/200000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))) (* (* -212097503/125000000000000000000000000 z1) (- (* z1 z1) (* 3 (* z1 z1))))))
(FPCore (z1) (/ (* z1 z1) (tan (- (* PI 4) -27401669256311/20000000000000))))
(FPCore (z1) (- (* (pow (cos z1) 4) (/ z1 (- 1 z1))) -1))
(FPCore (z1 z2) (/ (asin (* (* (tan z2) 1/2) (- (/ 1 z1) z1))) z1))
(FPCore (z1) (fabs (sin (* (- (- z1 -1) PI) 1/4))))
(FPCore (z1) (* (- z1 -1) (cos z1)))
(FPCore (z1 z2) (* (* (* z1 z2) z1) z2))
(FPCore (z1) (/ z1 (sqrt (- (* (- 1 (cos (- -1 z1))) (* -1/2 z1)) -1))))
(FPCore (z1) (- (- (- (* -3689471323/1000000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))) (* (* 881662847/200000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1)))) (- (* (* -212097503/125000000000000000000000000 z1) (- (* z1 z1) (* 3 (* z1 z1)))) (- (* 149230739/1250000000000000 z1) -2946529277/100000000000)))))
(FPCore (z1) (+ (log (fabs (sin (* (+ PI (- z1 -1)) 1/4)))) z1))
(FPCore (z1 z2) (log (fabs (* (cos (* -1/4 (+ (+ z2 z2) PI))) (pow (/ (- -1 (* (sin z2) z1)) (- (* (sin z2) z1) 1)) z1)))))
(FPCore (z1 z2) (* (fabs (atan (/ (sqrt (- (* z2 z2) 1)) (cos z1)))) (- z1)))
(FPCore (z1 z2) (* (pow (/ (- -1 (* (sin z2) z1)) (- (* (sin z2) z1) 1)) z1) (fabs (cos (* -1/4 (+ (+ z2 z2) PI))))))
(FPCore (z1) (- (+ (* (* -881662847/200000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))) (- (* -4165541759/500000000000000000000000000000000 (- (* (* (* z1 z1) z1) z1) (* (- (* (* 6 z1) z1) (* z1 z1)) (* z1 z1)))) (* (* -212097503/125000000000000000000000000 z1) (- (* 3 (* z1 z1)) (* z1 z1))))) 0))
(FPCore (z1 z2) (- (* (+ (sin (+ z2 z2)) 0) 1/2) (* (* (cos z1) (sin (- z1 -1))) 1/2)))
(FPCore (z1 z2) (pow (/ (- -1 (* (sin z2) z1)) (- (* (sin z2) z1) 1)) (* (* 1/2 z1) z1)))
(FPCore (z1) (asin (/ (sin z1) z1)))
(FPCore (z1) (* (tan (- (* -1/2 z1) (* PI -29/4))) (pow (/ (- (* (sin z1) z1) -1) (- 1 (* (sin z1) z1))) (* 1/2 z1))))
(FPCore (z1) (* 1/4 (- (cos (- -1 z1)) -1)))
(FPCore (z1) (* 4616990181/250000000000000000000 (* z1 z1)))
(FPCore (z1 z2) (pow (/ z2 z1) (/ 1 z1)))
(FPCore (z1 z2) (* (* (* (* (- 2 z1) z1) z2) z1) z1))
(FPCore (z1) (* (* (tan z1) 1/2) (- (/ 1 z1) z1)))
(FPCore (z1 z2) (asin (- (* (+ (sin (+ z2 z2)) 0) 1/2) (* (* (cos z1) (sin (- z1 -1))) 1/2))))
(FPCore (z1) (* (* (* -3689471323/1000000000000000000000000000000000 z1) z1) z1))
(FPCore (z1) (asin (* (* (tan z1) 1/2) (- (/ 1 z1) z1))))
(FPCore (z1 z2) (atan (* (tan (- (* 9/4 PI) -27401669256311/40000000000000)) (pow (/ z2 z1) (/ 1 z1)))))
(FPCore (z1) (- (* (- 4668270147/10000000000000000 (* 304747143/100000000000000000000 z1)) z1) 0))
(FPCore (z1) (atan2 (sin z1) (* (- -1 (cos (- -1 z1))) -1/2)))
(FPCore (z1 z2) (* (tan (- (* 9/4 PI) -27401669256311/40000000000000)) (pow (/ z2 z1) (/ 1 z1))))
(FPCore (z1) (* (* (* -3689471323/1000000000000000000000000000000000 z1) z1) (- (* (* 6 z1) z1) (* z1 z1))))
(FPCore (z1) (* (sqrt z1) z1))
(FPCore (z1) (fabs (sin (* (+ PI (- z1 -1)) 1/4))))
(FPCore (z1) (log (fabs (sin (* (+ PI (- z1 -1)) 1/4)))))