0.009 * [progress]: [Phase 1 of 3] Setting up.
0.001 * * * [progress]: [1/2] Preparing points
0.373 * * * [progress]: [2/2] Setting up program.
0.376 * [progress]: [Phase 2 of 3] Improving.
0.376 * [simplify]: Simplifying using  #<procedure:simplify-batch-egg> :
   (fabs (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
0.376 * [simplify]: Sending expressions to egg_math:
 (fabs (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
0.379 * * [simplify]: iteration  0 :  8  enodes  (cost  7 )
0.379 * [simplify]: Simplified to:
   (fabs (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
0.379 * * [progress]: iteration 1 / 4
0.379 * * * [progress]: picking best candidate
0.382 * * * * [pick]: Picked  #<alt (λ (a) (fabs (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))>
0.382 * * * [progress]: localizing error
0.394 * * * [progress]: generating rewritten candidates
0.394 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1)
0.394 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 1 1 1)
0.397 * * * * [progress]: [ 3 / 4 ] rewriting at (2 1 1 1)
0.397 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 1)
0.398 * * * [progress]: generating series expansions
0.398 * * * * [progress]: [ 1 / 4 ] generating series at (2 1)
0.398 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in (a) around 0
0.398 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
0.398 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
0.399 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in (a) around 0
0.399 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
0.399 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
0.400 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in (a) around 0
0.400 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
0.400 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
0.400 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 1 1 1)
0.400 * [approximate]: Taking taylor expansion of (sin (expm1 a)) in (a) around 0
0.401 * [taylor]: Taking taylor expansion of (sin (expm1 a)) in a
0.401 * [taylor]: Taking taylor expansion of (expm1 a) in a
0.401 * [taylor]: Rewrote expression to (- (exp a) 1)
0.401 * [taylor]: Taking taylor expansion of (exp a) in a
0.401 * [taylor]: Taking taylor expansion of a in a
0.401 * [taylor]: Taking taylor expansion of 1 in a
0.402 * [taylor]: Taking taylor expansion of (sin (expm1 a)) in a
0.402 * [taylor]: Taking taylor expansion of (expm1 a) in a
0.402 * [taylor]: Rewrote expression to (- (exp a) 1)
0.402 * [taylor]: Taking taylor expansion of (exp a) in a
0.402 * [taylor]: Taking taylor expansion of a in a
0.402 * [taylor]: Taking taylor expansion of 1 in a
0.413 * [approximate]: Taking taylor expansion of (sin (expm1 (/ 1 a))) in (a) around 0
0.413 * [taylor]: Taking taylor expansion of (sin (expm1 (/ 1 a))) in a
0.413 * [taylor]: Taking taylor expansion of (expm1 (/ 1 a)) in a
0.413 * [taylor]: Rewrote expression to (- (exp (/ 1 a)) 1)
0.413 * [taylor]: Taking taylor expansion of (exp (/ 1 a)) in a
0.413 * [taylor]: Taking taylor expansion of (/ 1 a) in a
0.413 * [taylor]: Taking taylor expansion of a in a
0.413 * [taylor]: Taking taylor expansion of 1 in a
0.414 * [taylor]: Taking taylor expansion of (sin (expm1 (/ 1 a))) in a
0.414 * [taylor]: Taking taylor expansion of (expm1 (/ 1 a)) in a
0.414 * [taylor]: Rewrote expression to (- (exp (/ 1 a)) 1)
0.414 * [taylor]: Taking taylor expansion of (exp (/ 1 a)) in a
0.414 * [taylor]: Taking taylor expansion of (/ 1 a) in a
0.414 * [taylor]: Taking taylor expansion of a in a
0.414 * [taylor]: Taking taylor expansion of 1 in a
0.441 * [approximate]: Taking taylor expansion of (sin (expm1 (/ -1 a))) in (a) around 0
0.441 * [taylor]: Taking taylor expansion of (sin (expm1 (/ -1 a))) in a
0.441 * [taylor]: Taking taylor expansion of (expm1 (/ -1 a)) in a
0.441 * [taylor]: Rewrote expression to (- (exp (/ -1 a)) 1)
0.441 * [taylor]: Taking taylor expansion of (exp (/ -1 a)) in a
0.441 * [taylor]: Taking taylor expansion of (/ -1 a) in a
0.441 * [taylor]: Taking taylor expansion of -1 in a
0.441 * [taylor]: Taking taylor expansion of a in a
0.441 * [taylor]: Taking taylor expansion of 1 in a
0.442 * [taylor]: Taking taylor expansion of (sin (expm1 (/ -1 a))) in a
0.442 * [taylor]: Taking taylor expansion of (expm1 (/ -1 a)) in a
0.442 * [taylor]: Rewrote expression to (- (exp (/ -1 a)) 1)
0.442 * [taylor]: Taking taylor expansion of (exp (/ -1 a)) in a
0.442 * [taylor]: Taking taylor expansion of (/ -1 a) in a
0.442 * [taylor]: Taking taylor expansion of -1 in a
0.442 * [taylor]: Taking taylor expansion of a in a
0.442 * [taylor]: Taking taylor expansion of 1 in a
0.462 * * * * [progress]: [ 3 / 4 ] generating series at (2 1 1 1)
0.462 * [approximate]: Taking taylor expansion of (expm1 (sin (expm1 a))) in (a) around 0
0.462 * [taylor]: Taking taylor expansion of (expm1 (sin (expm1 a))) in a
0.462 * [taylor]: Rewrote expression to (- (exp (sin (expm1 a))) 1)
0.462 * [taylor]: Taking taylor expansion of (exp (sin (expm1 a))) in a
0.462 * [taylor]: Taking taylor expansion of (sin (expm1 a)) in a
0.462 * [taylor]: Taking taylor expansion of (expm1 a) in a
0.463 * [taylor]: Rewrote expression to (- (exp a) 1)
0.463 * [taylor]: Taking taylor expansion of (exp a) in a
0.463 * [taylor]: Taking taylor expansion of a in a
0.463 * [taylor]: Taking taylor expansion of 1 in a
0.464 * [taylor]: Taking taylor expansion of 1 in a
0.464 * [taylor]: Taking taylor expansion of (expm1 (sin (expm1 a))) in a
0.464 * [taylor]: Rewrote expression to (- (exp (sin (expm1 a))) 1)
0.464 * [taylor]: Taking taylor expansion of (exp (sin (expm1 a))) in a
0.464 * [taylor]: Taking taylor expansion of (sin (expm1 a)) in a
0.465 * [taylor]: Taking taylor expansion of (expm1 a) in a
0.465 * [taylor]: Rewrote expression to (- (exp a) 1)
0.465 * [taylor]: Taking taylor expansion of (exp a) in a
0.465 * [taylor]: Taking taylor expansion of a in a
0.465 * [taylor]: Taking taylor expansion of 1 in a
0.466 * [taylor]: Taking taylor expansion of 1 in a
0.475 * [approximate]: Taking taylor expansion of (expm1 (sin (expm1 (/ 1 a)))) in (a) around 0
0.475 * [taylor]: Taking taylor expansion of (expm1 (sin (expm1 (/ 1 a)))) in a
0.475 * [taylor]: Rewrote expression to (- (exp (sin (expm1 (/ 1 a)))) 1)
0.475 * [taylor]: Taking taylor expansion of (exp (sin (expm1 (/ 1 a)))) in a
0.475 * [taylor]: Taking taylor expansion of (sin (expm1 (/ 1 a))) in a
0.475 * [taylor]: Taking taylor expansion of (expm1 (/ 1 a)) in a
0.475 * [taylor]: Rewrote expression to (- (exp (/ 1 a)) 1)
0.475 * [taylor]: Taking taylor expansion of (exp (/ 1 a)) in a
0.476 * [taylor]: Taking taylor expansion of (/ 1 a) in a
0.476 * [taylor]: Taking taylor expansion of a in a
0.476 * [taylor]: Taking taylor expansion of 1 in a
0.476 * [taylor]: Taking taylor expansion of 1 in a
0.476 * [taylor]: Taking taylor expansion of (expm1 (sin (expm1 (/ 1 a)))) in a
0.476 * [taylor]: Rewrote expression to (- (exp (sin (expm1 (/ 1 a)))) 1)
0.477 * [taylor]: Taking taylor expansion of (exp (sin (expm1 (/ 1 a)))) in a
0.477 * [taylor]: Taking taylor expansion of (sin (expm1 (/ 1 a))) in a
0.477 * [taylor]: Taking taylor expansion of (expm1 (/ 1 a)) in a
0.477 * [taylor]: Rewrote expression to (- (exp (/ 1 a)) 1)
0.477 * [taylor]: Taking taylor expansion of (exp (/ 1 a)) in a
0.477 * [taylor]: Taking taylor expansion of (/ 1 a) in a
0.477 * [taylor]: Taking taylor expansion of a in a
0.477 * [taylor]: Taking taylor expansion of 1 in a
0.478 * [taylor]: Taking taylor expansion of 1 in a
0.508 * [approximate]: Taking taylor expansion of (expm1 (sin (expm1 (/ -1 a)))) in (a) around 0
0.508 * [taylor]: Taking taylor expansion of (expm1 (sin (expm1 (/ -1 a)))) in a
0.509 * [taylor]: Rewrote expression to (- (exp (sin (expm1 (/ -1 a)))) 1)
0.509 * [taylor]: Taking taylor expansion of (exp (sin (expm1 (/ -1 a)))) in a
0.509 * [taylor]: Taking taylor expansion of (sin (expm1 (/ -1 a))) in a
0.509 * [taylor]: Taking taylor expansion of (expm1 (/ -1 a)) in a
0.509 * [taylor]: Rewrote expression to (- (exp (/ -1 a)) 1)
0.509 * [taylor]: Taking taylor expansion of (exp (/ -1 a)) in a
0.509 * [taylor]: Taking taylor expansion of (/ -1 a) in a
0.509 * [taylor]: Taking taylor expansion of -1 in a
0.509 * [taylor]: Taking taylor expansion of a in a
0.509 * [taylor]: Taking taylor expansion of 1 in a
0.510 * [taylor]: Taking taylor expansion of 1 in a
0.510 * [taylor]: Taking taylor expansion of (expm1 (sin (expm1 (/ -1 a)))) in a
0.510 * [taylor]: Rewrote expression to (- (exp (sin (expm1 (/ -1 a)))) 1)
0.510 * [taylor]: Taking taylor expansion of (exp (sin (expm1 (/ -1 a)))) in a
0.510 * [taylor]: Taking taylor expansion of (sin (expm1 (/ -1 a))) in a
0.510 * [taylor]: Taking taylor expansion of (expm1 (/ -1 a)) in a
0.510 * [taylor]: Rewrote expression to (- (exp (/ -1 a)) 1)
0.510 * [taylor]: Taking taylor expansion of (exp (/ -1 a)) in a
0.510 * [taylor]: Taking taylor expansion of (/ -1 a) in a
0.510 * [taylor]: Taking taylor expansion of -1 in a
0.510 * [taylor]: Taking taylor expansion of a in a
0.510 * [taylor]: Taking taylor expansion of 1 in a
0.511 * [taylor]: Taking taylor expansion of 1 in a
0.546 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 1)
0.546 * [approximate]: Taking taylor expansion of (atan2 (expm1 (sin (expm1 a))) (atan a)) in (a) around 0
0.546 * [taylor]: Taking taylor expansion of (atan2 (expm1 (sin (expm1 a))) (atan a)) in a
0.546 * [taylor]: Taking taylor expansion of (atan2 (expm1 (sin (expm1 a))) (atan a)) in a
0.546 * [approximate]: Taking taylor expansion of (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) in (a) around 0
0.546 * [taylor]: Taking taylor expansion of (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) in a
0.547 * [taylor]: Taking taylor expansion of (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) in a
0.547 * [approximate]: Taking taylor expansion of (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) in (a) around 0
0.547 * [taylor]: Taking taylor expansion of (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) in a
0.547 * [taylor]: Taking taylor expansion of (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) in a
0.548 * * * [progress]: simplifying candidates
0.548 * [simplify]: Simplifying using  #<procedure:simplify-batch-egg> :
   (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (* (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (sin (expm1 a)))
  (log1p (sin (expm1 a)))
  (* (sin (exp a)) (cos 1))
  (* (cos (exp a)) (sin 1))
  (log (sin (expm1 a)))
  (exp (sin (expm1 a)))
  (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))
  (cbrt (sin (expm1 a)))
  (* (* (sin (expm1 a)) (sin (expm1 a))) (sin (expm1 a)))
  (sqrt (sin (expm1 a)))
  (sqrt (sin (expm1 a)))
  (exp (sin (expm1 a)))
  (expm1 (expm1 (sin (expm1 a))))
  (log1p (expm1 (sin (expm1 a))))
  (log (expm1 (sin (expm1 a))))
  (exp (expm1 (sin (expm1 a))))
  (* (cbrt (expm1 (sin (expm1 a)))) (cbrt (expm1 (sin (expm1 a)))))
  (cbrt (expm1 (sin (expm1 a))))
  (* (* (expm1 (sin (expm1 a))) (expm1 (sin (expm1 a)))) (expm1 (sin (expm1 a))))
  (sqrt (expm1 (sin (expm1 a))))
  (sqrt (expm1 (sin (expm1 a))))
  (expm1 (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (log1p (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (log (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (exp (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (* (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a))) (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a))))
  (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (* (* (atan2 (expm1 (sin (expm1 a))) (atan a)) (atan2 (expm1 (sin (expm1 a))) (atan a))) (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (sqrt (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (sqrt (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (- (+ (* 1/2 (pow a 2)) a) (* 5/24 (pow a 4)))
  (sin (- (exp a) 1))
  (sin (- (exp a) 1))
  (+ (* 2/3 (pow a 3)) (+ (pow a 2) a))
  (- (exp (sin (- (exp a) 1))) 1)
  (- (exp (sin (- (exp a) 1))) 1)
  (atan2 (expm1 (sin (expm1 a))) (atan a))
  (atan2 (expm1 (sin (expm1 a))) (atan a))
  (atan2 (expm1 (sin (expm1 a))) (atan a))
0.548 * [simplify]: Sending expressions to egg_math:
 (expm1 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log1p (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (exp (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)))
 (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (* (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (expm1 (sin (expm1 h0)))
 (log1p (sin (expm1 h0)))
 (* (sin (exp h0)) (cos 1))
 (* (cos (exp h0)) (sin 1))
 (log (sin (expm1 h0)))
 (exp (sin (expm1 h0)))
 (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))
 (cbrt (sin (expm1 h0)))
 (* (* (sin (expm1 h0)) (sin (expm1 h0))) (sin (expm1 h0)))
 (sqrt (sin (expm1 h0)))
 (sqrt (sin (expm1 h0)))
 (exp (sin (expm1 h0)))
 (expm1 (expm1 (sin (expm1 h0))))
 (log1p (expm1 (sin (expm1 h0))))
 (log (expm1 (sin (expm1 h0))))
 (exp (expm1 (sin (expm1 h0))))
 (* (cbrt (expm1 (sin (expm1 h0)))) (cbrt (expm1 (sin (expm1 h0)))))
 (cbrt (expm1 (sin (expm1 h0))))
 (* (* (expm1 (sin (expm1 h0))) (expm1 (sin (expm1 h0)))) (expm1 (sin (expm1 h0))))
 (sqrt (expm1 (sin (expm1 h0))))
 (sqrt (expm1 (sin (expm1 h0))))
 (expm1 (atan2 (expm1 (sin (expm1 h0))) (atan h0)))
 (log1p (atan2 (expm1 (sin (expm1 h0))) (atan h0)))
 (log (atan2 (expm1 (sin (expm1 h0))) (atan h0)))
 (exp (atan2 (expm1 (sin (expm1 h0))) (atan h0)))
 (* (cbrt (atan2 (expm1 (sin (expm1 h0))) (atan h0))) (cbrt (atan2 (expm1 (sin (expm1 h0))) (atan h0))))
 (cbrt (atan2 (expm1 (sin (expm1 h0))) (atan h0)))
 (* (* (atan2 (expm1 (sin (expm1 h0))) (atan h0)) (atan2 (expm1 (sin (expm1 h0))) (atan h0))) (atan2 (expm1 (sin (expm1 h0))) (atan h0)))
 (sqrt (atan2 (expm1 (sin (expm1 h0))) (atan h0)))
 (sqrt (atan2 (expm1 (sin (expm1 h0))) (atan h0)))
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (- (+ (* 1/2 (pow h0 2)) h0) (* 5/24 (pow h0 4)))
 (sin (- (exp h0) 1))
 (sin (- (exp h0) 1))
 (+ (* 2/3 (pow h0 3)) (+ (pow h0 2) h0))
 (- (exp (sin (- (exp h0) 1))) 1)
 (- (exp (sin (- (exp h0) 1))) 1)
 (atan2 (expm1 (sin (expm1 h0))) (atan h0))
 (atan2 (expm1 (sin (expm1 h0))) (atan h0))
 (atan2 (expm1 (sin (expm1 h0))) (atan h0))
0.551 * * [simplify]: iteration  0 :  108  enodes  (cost  302 )
0.554 * * [simplify]: iteration  1 :  242  enodes  (cost  264 )
0.558 * * [simplify]: iteration  2 :  720  enodes  (cost  264 )
0.573 * * [simplify]: iteration  3 :  2933  enodes  (cost  264 )
0.667 * * [simplify]: iteration  4 :  5001  enodes  (cost  264 )
0.668 * [simplify]: Simplified to:
   (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3)
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (sin (expm1 a)))
  (log1p (sin (expm1 a)))
  (* (sin (exp a)) (cos 1))
  (* (cos (exp a)) (sin 1))
  (log (sin (expm1 a)))
  (exp (sin (expm1 a)))
  (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))
  (cbrt (sin (expm1 a)))
  (pow (sin (expm1 a)) 3)
  (sqrt (sin (expm1 a)))
  (sqrt (sin (expm1 a)))
  (exp (sin (expm1 a)))
  (expm1 (expm1 (sin (expm1 a))))
  (sin (expm1 a))
  (log (expm1 (sin (expm1 a))))
  (exp (expm1 (sin (expm1 a))))
  (* (cbrt (expm1 (sin (expm1 a)))) (cbrt (expm1 (sin (expm1 a)))))
  (cbrt (expm1 (sin (expm1 a))))
  (pow (expm1 (sin (expm1 a))) 3)
  (sqrt (expm1 (sin (expm1 a))))
  (sqrt (expm1 (sin (expm1 a))))
  (expm1 (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (log1p (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (log (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (exp (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (* (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a))) (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a))))
  (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (pow (atan2 (expm1 (sin (expm1 a))) (atan a)) 3)
  (sqrt (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (sqrt (atan2 (expm1 (sin (expm1 a))) (atan a)))
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fma (pow a 2) 1/2 (- a (* 5/24 (pow a 4))))
  (sin (expm1 a))
  (sin (expm1 a))
  (fma (pow a 3) 2/3 (fma a a a))
  (expm1 (sin (expm1 a)))
  (expm1 (sin (expm1 a)))
  (atan2 (expm1 (sin (expm1 a))) (atan a))
  (atan2 (expm1 (sin (expm1 a))) (atan a))
  (atan2 (expm1 (sin (expm1 a))) (atan a))
0.669 * * * [progress]: adding candidates to table
0.826 * * [progress]: iteration 2 / 4
0.826 * * * [progress]: picking best candidate
0.865 * * * * [pick]: Picked  #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))))>
0.865 * * * [progress]: localizing error
0.882 * * * [progress]: generating rewritten candidates
0.882 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1 2 1)
0.882 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 1 2 1)
0.882 * * * * [progress]: [ 3 / 4 ] rewriting at (2 1 1 1 1)
0.882 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 2 1 1 1 1)
0.885 * * * [progress]: generating series expansions
0.885 * * * * [progress]: [ 1 / 4 ] generating series at (2 1 2 1)
0.886 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in (a) around 0
0.886 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
0.886 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
0.886 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in (a) around 0
0.886 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
0.886 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
0.887 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in (a) around 0
0.887 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
0.887 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
0.888 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 1 2 1)
0.888 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in (a) around 0
0.888 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
0.888 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
0.888 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in (a) around 0
0.888 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
0.888 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
0.889 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in (a) around 0
0.889 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
0.889 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
0.890 * * * * [progress]: [ 3 / 4 ] generating series at (2 1 1 1 1)
0.890 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in (a) around 0
0.890 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
0.890 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
0.890 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in (a) around 0
0.890 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
0.891 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
0.891 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in (a) around 0
0.891 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
0.891 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
0.892 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 2 1 1 1 1)
0.892 * [approximate]: Taking taylor expansion of (sin (expm1 a)) in (a) around 0
0.892 * [taylor]: Taking taylor expansion of (sin (expm1 a)) in a
0.892 * [taylor]: Taking taylor expansion of (expm1 a) in a
0.892 * [taylor]: Rewrote expression to (- (exp a) 1)
0.892 * [taylor]: Taking taylor expansion of (exp a) in a
0.892 * [taylor]: Taking taylor expansion of a in a
0.892 * [taylor]: Taking taylor expansion of 1 in a
0.894 * [taylor]: Taking taylor expansion of (sin (expm1 a)) in a
0.894 * [taylor]: Taking taylor expansion of (expm1 a) in a
0.894 * [taylor]: Rewrote expression to (- (exp a) 1)
0.894 * [taylor]: Taking taylor expansion of (exp a) in a
0.894 * [taylor]: Taking taylor expansion of a in a
0.894 * [taylor]: Taking taylor expansion of 1 in a
0.903 * [approximate]: Taking taylor expansion of (sin (expm1 (/ 1 a))) in (a) around 0
0.903 * [taylor]: Taking taylor expansion of (sin (expm1 (/ 1 a))) in a
0.904 * [taylor]: Taking taylor expansion of (expm1 (/ 1 a)) in a
0.904 * [taylor]: Rewrote expression to (- (exp (/ 1 a)) 1)
0.904 * [taylor]: Taking taylor expansion of (exp (/ 1 a)) in a
0.904 * [taylor]: Taking taylor expansion of (/ 1 a) in a
0.904 * [taylor]: Taking taylor expansion of a in a
0.904 * [taylor]: Taking taylor expansion of 1 in a
0.904 * [taylor]: Taking taylor expansion of (sin (expm1 (/ 1 a))) in a
0.904 * [taylor]: Taking taylor expansion of (expm1 (/ 1 a)) in a
0.904 * [taylor]: Rewrote expression to (- (exp (/ 1 a)) 1)
0.904 * [taylor]: Taking taylor expansion of (exp (/ 1 a)) in a
0.904 * [taylor]: Taking taylor expansion of (/ 1 a) in a
0.904 * [taylor]: Taking taylor expansion of a in a
0.905 * [taylor]: Taking taylor expansion of 1 in a
0.929 * [approximate]: Taking taylor expansion of (sin (expm1 (/ -1 a))) in (a) around 0
0.929 * [taylor]: Taking taylor expansion of (sin (expm1 (/ -1 a))) in a
0.929 * [taylor]: Taking taylor expansion of (expm1 (/ -1 a)) in a
0.929 * [taylor]: Rewrote expression to (- (exp (/ -1 a)) 1)
0.929 * [taylor]: Taking taylor expansion of (exp (/ -1 a)) in a
0.929 * [taylor]: Taking taylor expansion of (/ -1 a) in a
0.929 * [taylor]: Taking taylor expansion of -1 in a
0.929 * [taylor]: Taking taylor expansion of a in a
0.930 * [taylor]: Taking taylor expansion of 1 in a
0.930 * [taylor]: Taking taylor expansion of (sin (expm1 (/ -1 a))) in a
0.930 * [taylor]: Taking taylor expansion of (expm1 (/ -1 a)) in a
0.930 * [taylor]: Rewrote expression to (- (exp (/ -1 a)) 1)
0.930 * [taylor]: Taking taylor expansion of (exp (/ -1 a)) in a
0.930 * [taylor]: Taking taylor expansion of (/ -1 a) in a
0.930 * [taylor]: Taking taylor expansion of -1 in a
0.930 * [taylor]: Taking taylor expansion of a in a
0.930 * [taylor]: Taking taylor expansion of 1 in a
0.950 * * * [progress]: simplifying candidates
0.951 * [simplify]: Simplifying using  #<procedure:simplify-batch-egg> :
   (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (* (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (* (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (* (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (sin (expm1 a)))
  (log1p (sin (expm1 a)))
  (* (sin (exp a)) (cos 1))
  (* (cos (exp a)) (sin 1))
  (log (sin (expm1 a)))
  (exp (sin (expm1 a)))
  (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))
  (cbrt (sin (expm1 a)))
  (* (* (sin (expm1 a)) (sin (expm1 a))) (sin (expm1 a)))
  (sqrt (sin (expm1 a)))
  (sqrt (sin (expm1 a)))
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (- (+ (* 1/2 (pow a 2)) a) (* 5/24 (pow a 4)))
  (sin (- (exp a) 1))
  (sin (- (exp a) 1))
0.951 * [simplify]: Sending expressions to egg_math:
 (expm1 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log1p (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (exp (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)))
 (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (* (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (expm1 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log1p (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (exp (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)))
 (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (* (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (expm1 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log1p (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (exp (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)))
 (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (* (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (expm1 (sin (expm1 h0)))
 (log1p (sin (expm1 h0)))
 (* (sin (exp h0)) (cos 1))
 (* (cos (exp h0)) (sin 1))
 (log (sin (expm1 h0)))
 (exp (sin (expm1 h0)))
 (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))
 (cbrt (sin (expm1 h0)))
 (* (* (sin (expm1 h0)) (sin (expm1 h0))) (sin (expm1 h0)))
 (sqrt (sin (expm1 h0)))
 (sqrt (sin (expm1 h0)))
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (- (+ (* 1/2 (pow h0 2)) h0) (* 5/24 (pow h0 4)))
 (sin (- (exp h0) 1))
 (sin (- (exp h0) 1))
0.954 * * [simplify]: iteration  0 :  67  enodes  (cost  360 )
0.956 * * [simplify]: iteration  1 :  138  enodes  (cost  315 )
0.958 * * [simplify]: iteration  2 :  360  enodes  (cost  315 )
0.966 * * [simplify]: iteration  3 :  1390  enodes  (cost  315 )
1.014 * * [simplify]: iteration  4 :  5001  enodes  (cost  315 )
1.015 * [simplify]: Simplified to:
   (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3)
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3)
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3)
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (sin (expm1 a)))
  (log1p (sin (expm1 a)))
  (* (sin (exp a)) (cos 1))
  (* (cos (exp a)) (sin 1))
  (log (sin (expm1 a)))
  (exp (sin (expm1 a)))
  (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))
  (cbrt (sin (expm1 a)))
  (pow (sin (expm1 a)) 3)
  (sqrt (sin (expm1 a)))
  (sqrt (sin (expm1 a)))
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fma (pow a 2) 1/2 (- a (* 5/24 (pow a 4))))
  (sin (expm1 a))
  (sin (expm1 a))
1.016 * * * [progress]: adding candidates to table
1.212 * * [progress]: iteration 3 / 4
1.212 * * * [progress]: picking best candidate
1.283 * * * * [pick]: Picked  #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a)))))>
1.283 * * * [progress]: localizing error
1.312 * * * [progress]: generating rewritten candidates
1.312 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1 1 2 1)
1.313 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 1 1 1)
1.313 * * * * [progress]: [ 3 / 4 ] rewriting at (2 1 2 1)
1.313 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 2 1 1 1 1 1)
1.331 * * * [progress]: generating series expansions
1.331 * * * * [progress]: [ 1 / 4 ] generating series at (2 1 1 2 1)
1.331 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in (a) around 0
1.331 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
1.331 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
1.332 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in (a) around 0
1.332 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
1.332 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
1.333 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in (a) around 0
1.333 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
1.333 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
1.333 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 1 1 1)
1.334 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in (a) around 0
1.334 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
1.334 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
1.334 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in (a) around 0
1.334 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
1.334 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
1.335 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in (a) around 0
1.335 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
1.335 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
1.336 * * * * [progress]: [ 3 / 4 ] generating series at (2 1 2 1)
1.336 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in (a) around 0
1.336 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
1.336 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
1.337 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in (a) around 0
1.337 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
1.337 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
1.338 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in (a) around 0
1.338 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
1.338 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
1.338 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 2 1 1 1 1 1)
1.338 * [approximate]: Taking taylor expansion of (pow (pow (sin (expm1 a)) 2) 1/3) in (a) around 0
1.338 * [taylor]: Taking taylor expansion of (pow (pow (sin (expm1 a)) 2) 1/3) in a
1.338 * [taylor]: Taking taylor expansion of (exp (* 1/3 (log (pow (sin (expm1 a)) 2)))) in a
1.338 * [taylor]: Taking taylor expansion of (* 1/3 (log (pow (sin (expm1 a)) 2))) in a
1.338 * [taylor]: Taking taylor expansion of 1/3 in a
1.338 * [taylor]: Taking taylor expansion of (log (pow (sin (expm1 a)) 2)) in a
1.338 * [taylor]: Taking taylor expansion of (pow (sin (expm1 a)) 2) in a
1.338 * [taylor]: Taking taylor expansion of (sin (expm1 a)) in a
1.339 * [taylor]: Taking taylor expansion of (expm1 a) in a
1.339 * [taylor]: Rewrote expression to (- (exp a) 1)
1.339 * [taylor]: Taking taylor expansion of (exp a) in a
1.339 * [taylor]: Taking taylor expansion of a in a
1.339 * [taylor]: Taking taylor expansion of 1 in a
1.342 * [taylor]: Taking taylor expansion of (pow (pow (sin (expm1 a)) 2) 1/3) in a
1.342 * [taylor]: Taking taylor expansion of (exp (* 1/3 (log (pow (sin (expm1 a)) 2)))) in a
1.342 * [taylor]: Taking taylor expansion of (* 1/3 (log (pow (sin (expm1 a)) 2))) in a
1.342 * [taylor]: Taking taylor expansion of 1/3 in a
1.342 * [taylor]: Taking taylor expansion of (log (pow (sin (expm1 a)) 2)) in a
1.342 * [taylor]: Taking taylor expansion of (pow (sin (expm1 a)) 2) in a
1.342 * [taylor]: Taking taylor expansion of (sin (expm1 a)) in a
1.342 * [taylor]: Taking taylor expansion of (expm1 a) in a
1.342 * [taylor]: Rewrote expression to (- (exp a) 1)
1.342 * [taylor]: Taking taylor expansion of (exp a) in a
1.342 * [taylor]: Taking taylor expansion of a in a
1.342 * [taylor]: Taking taylor expansion of 1 in a
1.359 * [approximate]: Taking taylor expansion of (pow (pow (sin (expm1 (/ 1 a))) 2) 1/3) in (a) around 0
1.359 * [taylor]: Taking taylor expansion of (pow (pow (sin (expm1 (/ 1 a))) 2) 1/3) in a
1.359 * [taylor]: Taking taylor expansion of (exp (* 1/3 (log (pow (sin (expm1 (/ 1 a))) 2)))) in a
1.359 * [taylor]: Taking taylor expansion of (* 1/3 (log (pow (sin (expm1 (/ 1 a))) 2))) in a
1.359 * [taylor]: Taking taylor expansion of 1/3 in a
1.359 * [taylor]: Taking taylor expansion of (log (pow (sin (expm1 (/ 1 a))) 2)) in a
1.359 * [taylor]: Taking taylor expansion of (pow (sin (expm1 (/ 1 a))) 2) in a
1.359 * [taylor]: Taking taylor expansion of (sin (expm1 (/ 1 a))) in a
1.359 * [taylor]: Taking taylor expansion of (expm1 (/ 1 a)) in a
1.359 * [taylor]: Rewrote expression to (- (exp (/ 1 a)) 1)
1.359 * [taylor]: Taking taylor expansion of (exp (/ 1 a)) in a
1.359 * [taylor]: Taking taylor expansion of (/ 1 a) in a
1.359 * [taylor]: Taking taylor expansion of a in a
1.359 * [taylor]: Taking taylor expansion of 1 in a
1.360 * [taylor]: Taking taylor expansion of (pow (pow (sin (expm1 (/ 1 a))) 2) 1/3) in a
1.360 * [taylor]: Taking taylor expansion of (exp (* 1/3 (log (pow (sin (expm1 (/ 1 a))) 2)))) in a
1.360 * [taylor]: Taking taylor expansion of (* 1/3 (log (pow (sin (expm1 (/ 1 a))) 2))) in a
1.360 * [taylor]: Taking taylor expansion of 1/3 in a
1.360 * [taylor]: Taking taylor expansion of (log (pow (sin (expm1 (/ 1 a))) 2)) in a
1.360 * [taylor]: Taking taylor expansion of (pow (sin (expm1 (/ 1 a))) 2) in a
1.360 * [taylor]: Taking taylor expansion of (sin (expm1 (/ 1 a))) in a
1.360 * [taylor]: Taking taylor expansion of (expm1 (/ 1 a)) in a
1.360 * [taylor]: Rewrote expression to (- (exp (/ 1 a)) 1)
1.361 * [taylor]: Taking taylor expansion of (exp (/ 1 a)) in a
1.361 * [taylor]: Taking taylor expansion of (/ 1 a) in a
1.361 * [taylor]: Taking taylor expansion of a in a
1.361 * [taylor]: Taking taylor expansion of 1 in a
1.418 * [approximate]: Taking taylor expansion of (pow (pow (sin (expm1 (/ -1 a))) 2) 1/3) in (a) around 0
1.418 * [taylor]: Taking taylor expansion of (pow (pow (sin (expm1 (/ -1 a))) 2) 1/3) in a
1.418 * [taylor]: Taking taylor expansion of (exp (* 1/3 (log (pow (sin (expm1 (/ -1 a))) 2)))) in a
1.418 * [taylor]: Taking taylor expansion of (* 1/3 (log (pow (sin (expm1 (/ -1 a))) 2))) in a
1.418 * [taylor]: Taking taylor expansion of 1/3 in a
1.418 * [taylor]: Taking taylor expansion of (log (pow (sin (expm1 (/ -1 a))) 2)) in a
1.418 * [taylor]: Taking taylor expansion of (pow (sin (expm1 (/ -1 a))) 2) in a
1.418 * [taylor]: Taking taylor expansion of (sin (expm1 (/ -1 a))) in a
1.418 * [taylor]: Taking taylor expansion of (expm1 (/ -1 a)) in a
1.418 * [taylor]: Rewrote expression to (- (exp (/ -1 a)) 1)
1.418 * [taylor]: Taking taylor expansion of (exp (/ -1 a)) in a
1.418 * [taylor]: Taking taylor expansion of (/ -1 a) in a
1.418 * [taylor]: Taking taylor expansion of -1 in a
1.418 * [taylor]: Taking taylor expansion of a in a
1.418 * [taylor]: Taking taylor expansion of 1 in a
1.420 * [taylor]: Taking taylor expansion of (pow (pow (sin (expm1 (/ -1 a))) 2) 1/3) in a
1.420 * [taylor]: Taking taylor expansion of (exp (* 1/3 (log (pow (sin (expm1 (/ -1 a))) 2)))) in a
1.420 * [taylor]: Taking taylor expansion of (* 1/3 (log (pow (sin (expm1 (/ -1 a))) 2))) in a
1.420 * [taylor]: Taking taylor expansion of 1/3 in a
1.420 * [taylor]: Taking taylor expansion of (log (pow (sin (expm1 (/ -1 a))) 2)) in a
1.420 * [taylor]: Taking taylor expansion of (pow (sin (expm1 (/ -1 a))) 2) in a
1.420 * [taylor]: Taking taylor expansion of (sin (expm1 (/ -1 a))) in a
1.420 * [taylor]: Taking taylor expansion of (expm1 (/ -1 a)) in a
1.420 * [taylor]: Rewrote expression to (- (exp (/ -1 a)) 1)
1.420 * [taylor]: Taking taylor expansion of (exp (/ -1 a)) in a
1.420 * [taylor]: Taking taylor expansion of (/ -1 a) in a
1.420 * [taylor]: Taking taylor expansion of -1 in a
1.420 * [taylor]: Taking taylor expansion of a in a
1.420 * [taylor]: Taking taylor expansion of 1 in a
1.483 * * * [progress]: simplifying candidates
1.484 * [simplify]: Simplifying using  #<procedure:simplify-batch-egg> :
   (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (* (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (* (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a))
  (log (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a))
  (* (* (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a) (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a)) (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a))
  (expm1 (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))
  (log1p (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))
  (+ 1/3 1/3)
  (+ 1 1)
  (* (sin (expm1 a)) (sin (expm1 a)))
  (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))
  (+ 1 1)
  (+ (log (cbrt (sin (expm1 a)))) (log (cbrt (sin (expm1 a)))))
  (log (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))
  (exp (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))
  (* (sin (expm1 a)) (sin (expm1 a)))
  (* (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))))
  (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))
  (* (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))) (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))
  (sqrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))
  (sqrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))
  (* (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))))
  (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))
  (* (cbrt 1) (cbrt 1))
  (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))
  (* (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a))))) (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a))))))
  (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a)))))
  (* (sqrt (cbrt (sin (expm1 a)))) (sqrt (cbrt (sin (expm1 a)))))
  (* (sqrt (cbrt (sin (expm1 a)))) (sqrt (cbrt (sin (expm1 a)))))
  (* 1 1)
  (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))
  (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (sqrt (cbrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (sqrt (cbrt (sin (expm1 a)))))
  (* (sqrt (cbrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))
  (* (sqrt (cbrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))
  (* (sqrt (cbrt (sin (expm1 a)))) (sqrt (cbrt (sin (expm1 a)))))
  (* (sqrt (cbrt (sin (expm1 a)))) (sqrt (cbrt (sin (expm1 a)))))
  (* 2 1/3)
  (* 2 1)
  (* (cbrt (sin (expm1 a))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))))
  (* (cbrt (sin (expm1 a))) (cbrt (sqrt (sin (expm1 a)))))
  (* (cbrt (sin (expm1 a))) (cbrt 1))
  (* (cbrt (sin (expm1 a))) (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a))))))
  (* (cbrt (sin (expm1 a))) (sqrt (cbrt (sin (expm1 a)))))
  (* (cbrt (sin (expm1 a))) 1)
  (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))
  (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))
  (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))
  (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))
  (* (sqrt (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))
  (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (- (+ (pow a 2/3) (* 1/3 (pow (pow a 5) 1/3))) (* 1/36 (pow (pow a 8) 1/3)))
  (pow (pow (sin (- (exp a) 1)) 2) 1/3)
  (pow (pow (sin (- (exp a) 1)) 2) 1/3)
1.484 * [simplify]: Sending expressions to egg_math:
 (expm1 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log1p (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (exp (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)))
 (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (* (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (expm1 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log1p (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (exp (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)))
 (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (* (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (expm1 (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0))
 (log1p (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0))
 (log (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0))
 (exp (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0))
 (* (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0)))
 (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0))
 (* (* (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0) (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0)) (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0))
 (expm1 (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))))
 (log1p (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))))
 (+ 1/3 1/3)
 (+ 1 1)
 (* (sin (expm1 h0)) (sin (expm1 h0)))
 (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))
 (+ 1 1)
 (+ (log (cbrt (sin (expm1 h0)))) (log (cbrt (sin (expm1 h0)))))
 (log (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))))
 (exp (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))))
 (* (sin (expm1 h0)) (sin (expm1 h0)))
 (* (cbrt (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))) (cbrt (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))))
 (cbrt (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))))
 (* (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))) (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))))
 (sqrt (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))))
 (sqrt (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))))
 (* (cbrt (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))) (cbrt (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))))
 (* (cbrt (cbrt (sin (expm1 h0)))) (cbrt (cbrt (sin (expm1 h0)))))
 (* (cbrt (sqrt (sin (expm1 h0)))) (cbrt (sqrt (sin (expm1 h0)))))
 (* (cbrt (sqrt (sin (expm1 h0)))) (cbrt (sqrt (sin (expm1 h0)))))
 (* (cbrt 1) (cbrt 1))
 (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))
 (* (* (cbrt (cbrt (sin (expm1 h0)))) (cbrt (cbrt (sin (expm1 h0))))) (* (cbrt (cbrt (sin (expm1 h0)))) (cbrt (cbrt (sin (expm1 h0))))))
 (* (cbrt (cbrt (sin (expm1 h0)))) (cbrt (cbrt (sin (expm1 h0)))))
 (* (sqrt (cbrt (sin (expm1 h0)))) (sqrt (cbrt (sin (expm1 h0)))))
 (* (sqrt (cbrt (sin (expm1 h0)))) (sqrt (cbrt (sin (expm1 h0)))))
 (* 1 1)
 (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))
 (* (cbrt (sqrt (sin (expm1 h0)))) (cbrt (sqrt (sin (expm1 h0)))))
 (* (cbrt (sqrt (sin (expm1 h0)))) (cbrt (sqrt (sin (expm1 h0)))))
 (* (cbrt (sqrt (sin (expm1 h0)))) (sqrt (cbrt (sin (expm1 h0)))))
 (* (cbrt (sqrt (sin (expm1 h0)))) (sqrt (cbrt (sin (expm1 h0)))))
 (* (sqrt (cbrt (sin (expm1 h0)))) (cbrt (sqrt (sin (expm1 h0)))))
 (* (sqrt (cbrt (sin (expm1 h0)))) (cbrt (sqrt (sin (expm1 h0)))))
 (* (sqrt (cbrt (sin (expm1 h0)))) (sqrt (cbrt (sin (expm1 h0)))))
 (* (sqrt (cbrt (sin (expm1 h0)))) (sqrt (cbrt (sin (expm1 h0)))))
 (* 2 1/3)
 (* 2 1)
 (* (cbrt (sin (expm1 h0))) (cbrt (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))))
 (* (cbrt (sin (expm1 h0))) (cbrt (sqrt (sin (expm1 h0)))))
 (* (cbrt (sin (expm1 h0))) (cbrt 1))
 (* (cbrt (sin (expm1 h0))) (* (cbrt (cbrt (sin (expm1 h0)))) (cbrt (cbrt (sin (expm1 h0))))))
 (* (cbrt (sin (expm1 h0))) (sqrt (cbrt (sin (expm1 h0)))))
 (* (cbrt (sin (expm1 h0))) 1)
 (* (cbrt (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))
 (* (cbrt (sqrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))
 (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))
 (* (cbrt (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))
 (* (sqrt (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))
 (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0))))
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (- (+ (pow h0 2/3) (* 1/3 (pow (pow h0 5) 1/3))) (* 1/36 (pow (pow h0 8) 1/3)))
 (pow (pow (sin (- (exp h0) 1)) 2) 1/3)
 (pow (pow (sin (- (exp h0) 1)) 2) 1/3)
1.488 * * [simplify]: iteration  0 :  151  enodes  (cost  788 )
1.492 * * [simplify]: iteration  1 :  447  enodes  (cost  697 )
1.503 * * [simplify]: iteration  2 :  1900  enodes  (cost  571 )
1.547 * * [simplify]: iteration  3 :  5001  enodes  (cost  561 )
1.549 * [simplify]: Simplified to:
   (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3)
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3)
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3)
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))
  (log1p (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))
  2/3
  2
  (pow (sin (expm1 a)) 2)
  (pow (pow (sin (expm1 a)) 2) 1/3)
  2
  (* 2 (log (cbrt (sin (expm1 a)))))
  (* 2 (log (cbrt (sin (expm1 a)))))
  (pow (exp 1) (pow (sqrt (cbrt (sin (expm1 a)))) 4))
  (pow (sin (expm1 a)) 2)
  (* (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))))
  (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))
  (pow (sin (expm1 a)) 2)
  (fabs (cbrt (sin (expm1 a))))
  (fabs (cbrt (sin (expm1 a))))
  (* (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))))
  (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))
  1
  (pow (pow (sin (expm1 a)) 2) 1/3)
  (pow (cbrt (cbrt (sin (expm1 a)))) 4)
  (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a)))))
  (cbrt (sin (expm1 a)))
  (cbrt (sin (expm1 a)))
  1
  (pow (pow (sin (expm1 a)) 2) 1/3)
  (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (sqrt (cbrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (sqrt (cbrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (sqrt (cbrt (sin (expm1 a)))))
  (* (cbrt (sqrt (sin (expm1 a)))) (sqrt (cbrt (sin (expm1 a)))))
  (cbrt (sin (expm1 a)))
  (cbrt (sin (expm1 a)))
  2/3
  2
  (* (cbrt (sin (expm1 a))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))))
  (* (cbrt (sin (expm1 a))) (cbrt (sqrt (sin (expm1 a)))))
  (cbrt (sin (expm1 a)))
  (pow (cbrt (cbrt (sin (expm1 a)))) 5)
  (pow (sqrt (cbrt (sin (expm1 a)))) 3)
  (cbrt (sin (expm1 a)))
  (pow (cbrt (cbrt (sin (expm1 a)))) 4)
  (* (cbrt (sin (expm1 a))) (cbrt (sqrt (sin (expm1 a)))))
  (pow (pow (sin (expm1 a)) 2) 1/3)
  (pow (cbrt (cbrt (sin (expm1 a)))) 4)
  (pow (sqrt (cbrt (sin (expm1 a)))) 3)
  (pow (pow (sin (expm1 a)) 2) 1/3)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fma (pow (pow a 5) 1/3) 1/3 (- (pow a 2/3) (* 1/36 (pow (pow a 8) 1/3))))
  (pow (pow (sin (expm1 a)) 2) 1/3)
  (pow (pow (sin (expm1 a)) 2) 1/3)
1.550 * * * [progress]: adding candidates to table
1.913 * * [progress]: iteration 4 / 4
1.913 * * * [progress]: picking best candidate
2.044 * * * * [pick]: Picked  #<alt (λ (a) (fabs (* (* (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a)))))>
2.044 * * * [progress]: localizing error
2.082 * * * [progress]: generating rewritten candidates
2.082 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1 1 2 1)
2.082 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 1 1 1 2 1)
2.083 * * * * [progress]: [ 3 / 4 ] rewriting at (2 1 1 1 1 1 2 1)
2.083 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 1 1 1 1 1 1)
2.084 * * * [progress]: generating series expansions
2.084 * * * * [progress]: [ 1 / 4 ] generating series at (2 1 1 2 1)
2.084 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in (a) around 0
2.084 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
2.084 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
2.085 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in (a) around 0
2.085 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
2.085 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
2.085 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in (a) around 0
2.085 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
2.085 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
2.086 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 1 1 1 2 1)
2.086 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in (a) around 0
2.086 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
2.086 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
2.087 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in (a) around 0
2.087 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
2.087 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
2.087 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in (a) around 0
2.087 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
2.088 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
2.088 * * * * [progress]: [ 3 / 4 ] generating series at (2 1 1 1 1 1 2 1)
2.088 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in (a) around 0
2.088 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
2.088 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
2.089 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in (a) around 0
2.089 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
2.089 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
2.090 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in (a) around 0
2.090 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
2.090 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
2.090 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 1 1 1 1 1 1)
2.090 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in (a) around 0
2.090 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
2.090 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) in a
2.091 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in (a) around 0
2.091 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
2.091 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ 1 a)))) (atan (/ 1 a))) (/ 1 a)) in a
2.092 * [approximate]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in (a) around 0
2.092 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
2.092 * [taylor]: Taking taylor expansion of (fmod (atan2 (expm1 (sin (expm1 (/ -1 a)))) (atan (/ -1 a))) (/ -1 a)) in a
2.093 * * * [progress]: simplifying candidates
2.093 * [simplify]: Simplifying using  #<procedure:simplify-batch-egg> :
   (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (* (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (* (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (* (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (* (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
2.093 * [simplify]: Sending expressions to egg_math:
 (expm1 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log1p (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (exp (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)))
 (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (* (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (expm1 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log1p (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (exp (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)))
 (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (* (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (expm1 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log1p (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (exp (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)))
 (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (* (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (expm1 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log1p (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (log (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (exp (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)))
 (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (* (* (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (sqrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
 (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)
2.096 * * [simplify]: iteration  0 :  17  enodes  (cost  408 )
2.097 * * [simplify]: iteration  1 :  19  enodes  (cost  356 )
2.099 * * [simplify]: iteration  2 :  23  enodes  (cost  356 )
2.100 * * [simplify]: iteration  3 :  28  enodes  (cost  356 )
2.101 * * [simplify]: iteration  4 :  47  enodes  (cost  356 )
2.103 * * [simplify]: iteration  5 :  101  enodes  (cost  356 )
2.107 * * [simplify]: iteration  6 :  507  enodes  (cost  356 )
2.121 * * [simplify]: iteration  7 :  1681  enodes  (cost  356 )
2.185 * * [simplify]: iteration  8 :  5001  enodes  (cost  356 )
2.187 * [simplify]: Simplified to:
   (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3)
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3)
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3)
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (expm1 (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log1p (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (exp (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))
  (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3)
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (sqrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
  (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)
2.187 * * * [progress]: adding candidates to table
2.456 * [progress]: [Phase 3 of 3] Extracting.
2.457 * * [regime]: Finding splitpoints for: (#<alt (λ (a) (fabs (fmod (atan2 (* (* (cbrt (expm1 (sin (expm1 a)))) (cbrt (expm1 (sin (expm1 a))))) (cbrt (expm1 (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (fmod (atan2 (expm1 (fma (pow a 2) 1/2 (- a (* 5/24 (pow a 4))))) (atan a)) a)))> #<alt (λ (a) (fabs (* (* (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))) (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))))) (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (sqrt (sin (expm1 a))) (sqrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (cbrt (pow (sin (expm1 a)) 2)) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (exp (log (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (fmod (cbrt (pow (atan2 (expm1 (sin (expm1 a))) (atan a)) 3)) a)))> #<alt (λ (a) (fabs (fmod (log (exp (atan2 (expm1 (sin (expm1 a))) (atan a)))) a)))> #<alt (λ (a) (fabs (fmod (* (* (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a))) (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a)))) (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a)))) a)))> #<alt (λ (a) (fabs (fmod (atan2 (expm1 (log (exp (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (exp (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))))> #<alt (λ (a) (fabs (cbrt (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3))))> #<alt (λ (a) (fabs (fmod (atan2 (exp (log (expm1 (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (fmod (atan2 (* (sqrt (expm1 (sin (expm1 a)))) (sqrt (expm1 (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (log (pow (exp 1) (pow (sqrt (cbrt (sin (expm1 a)))) 4))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a))))) (pow (cbrt (cbrt (sin (expm1 a)))) 4)) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (exp (* 2 (log (cbrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))) (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (cbrt 1) (pow (pow (sin (expm1 a)) 2) 1/3)) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (pow (cbrt (cbrt (sin (expm1 a)))) 5) (cbrt (cbrt (sin (expm1 a))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (log (exp (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (pow (sin (expm1 a)) 2/3) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a))))) (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (sqrt (cbrt (sin (expm1 a)))) (pow (sqrt (cbrt (sin (expm1 a)))) 3)) (cbrt (sin (expm1 a))))) (atan a)) a)))))>)
2.473 * * * [regime-changes]: Trying 2 branch expressions: ((fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) a)
2.474 * * * * [regimes]: Trying to branch on (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) from (#<alt (λ (a) (fabs (fmod (atan2 (* (* (cbrt (expm1 (sin (expm1 a)))) (cbrt (expm1 (sin (expm1 a))))) (cbrt (expm1 (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (fmod (atan2 (expm1 (fma (pow a 2) 1/2 (- a (* 5/24 (pow a 4))))) (atan a)) a)))> #<alt (λ (a) (fabs (* (* (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))) (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))))) (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (sqrt (sin (expm1 a))) (sqrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (cbrt (pow (sin (expm1 a)) 2)) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (exp (log (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (fmod (cbrt (pow (atan2 (expm1 (sin (expm1 a))) (atan a)) 3)) a)))> #<alt (λ (a) (fabs (fmod (log (exp (atan2 (expm1 (sin (expm1 a))) (atan a)))) a)))> #<alt (λ (a) (fabs (fmod (* (* (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a))) (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a)))) (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a)))) a)))> #<alt (λ (a) (fabs (fmod (atan2 (expm1 (log (exp (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (exp (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))))> #<alt (λ (a) (fabs (cbrt (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3))))> #<alt (λ (a) (fabs (fmod (atan2 (exp (log (expm1 (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (fmod (atan2 (* (sqrt (expm1 (sin (expm1 a)))) (sqrt (expm1 (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (log (pow (exp 1) (pow (sqrt (cbrt (sin (expm1 a)))) 4))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a))))) (pow (cbrt (cbrt (sin (expm1 a)))) 4)) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (exp (* 2 (log (cbrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))) (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (cbrt 1) (pow (pow (sin (expm1 a)) 2) 1/3)) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (pow (cbrt (cbrt (sin (expm1 a)))) 5) (cbrt (cbrt (sin (expm1 a))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (log (exp (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (pow (sin (expm1 a)) 2/3) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a))))) (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (sqrt (cbrt (sin (expm1 a)))) (pow (sqrt (cbrt (sin (expm1 a)))) 3)) (cbrt (sin (expm1 a))))) (atan a)) a)))))>)
2.637 * * * * [regimes]: Trying to branch on (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) from (#<alt (λ (a) (fabs (exp (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))))> #<alt (λ (a) (fabs (cbrt (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))))))>)
2.678 * * * * [regimes]: Trying to branch on a from (#<alt (λ (a) (fabs (fmod (atan2 (* (* (cbrt (expm1 (sin (expm1 a)))) (cbrt (expm1 (sin (expm1 a))))) (cbrt (expm1 (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (fmod (atan2 (expm1 (fma (pow a 2) 1/2 (- a (* 5/24 (pow a 4))))) (atan a)) a)))> #<alt (λ (a) (fabs (* (* (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))) (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))))) (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (sqrt (sin (expm1 a))) (sqrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (cbrt (pow (sin (expm1 a)) 2)) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (exp (log (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (fmod (cbrt (pow (atan2 (expm1 (sin (expm1 a))) (atan a)) 3)) a)))> #<alt (λ (a) (fabs (fmod (log (exp (atan2 (expm1 (sin (expm1 a))) (atan a)))) a)))> #<alt (λ (a) (fabs (fmod (* (* (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a))) (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a)))) (cbrt (atan2 (expm1 (sin (expm1 a))) (atan a)))) a)))> #<alt (λ (a) (fabs (fmod (atan2 (expm1 (log (exp (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (exp (log (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))))> #<alt (λ (a) (fabs (cbrt (pow (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a) 3))))> #<alt (λ (a) (fabs (fmod (atan2 (exp (log (expm1 (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (fmod (atan2 (* (sqrt (expm1 (sin (expm1 a)))) (sqrt (expm1 (sin (expm1 a))))) (atan a)) a)))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (log (pow (exp 1) (pow (sqrt (cbrt (sin (expm1 a)))) 4))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a))))) (pow (cbrt (cbrt (sin (expm1 a)))) 4)) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (exp (* 2 (log (cbrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))) (* (cbrt (cbrt (sin (expm1 a)))) (cbrt (cbrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (cbrt 1) (pow (pow (sin (expm1 a)) 2) 1/3)) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (pow (cbrt (cbrt (sin (expm1 a)))) 5) (cbrt (cbrt (sin (expm1 a))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (log (exp (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))) (cbrt (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (pow (sin (expm1 a)) 2/3) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a))))) (* (cbrt (sqrt (sin (expm1 a)))) (cbrt (sqrt (sin (expm1 a)))))) (cbrt (sin (expm1 a))))) (atan a)) a)))))> #<alt (λ (a) (fabs (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (* (* (sqrt (cbrt (sin (expm1 a)))) (pow (sqrt (cbrt (sin (expm1 a)))) 3)) (cbrt (sin (expm1 a))))) (atan a)) a)))))>)
2.825 * * * [regime]: Found split indices: #<option (#s(si 2 255))>
2.825 * [simplify]: Simplifying using  #<procedure:simplify-batch-egg> :
   (fabs (* (* (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))) (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))))) (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a))))
2.826 * [simplify]: Sending expressions to egg_math:
 (fabs (* (* (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)))) (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0)) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))) (cbrt (fmod (atan2 (expm1 (sin (expm1 h0))) (atan h0)) h0))))) (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 h0))) (cbrt (sin (expm1 h0)))) (cbrt (sin (expm1 h0))))) (atan h0)) h0))))
2.826 * * [simplify]: iteration  0 :  24  enodes  (cost  67 )
2.826 * * [simplify]: iteration  1 :  24  enodes  (cost  67 )
2.827 * [simplify]: Simplified to:
   (fabs (* (* (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))) (cbrt (* (* (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))) (cbrt (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a))))) (cbrt (fmod (atan2 (expm1 (* (* (cbrt (sin (expm1 a))) (cbrt (sin (expm1 a)))) (cbrt (sin (expm1 a))))) (atan a)) a))))
18.102 * [regime-testing]: Baseline error score: 33.80415605617709
18.102 * [regime-testing]: Oracle error score: 32.174197274336144
18.104 * [regime-testing]: End program error score: 33.80415605617709