* [misc]progress:  [Phase 1 of 3] Setting up.
* * * [misc]progress:  [1/2] Preparing points
* * * * [misc]points:  Sampling 256 additional inputs, on iter 0 have 0 / 256
* * * * [misc]points:  Computing exacts on every 16 of 256 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 8 of 256 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 4 of 256 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 2 of 256 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts for 256 points
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Filtering points with unrepresentable outputs
* * * * [exit]points:  Sampled 256 points with exact outputs
* * * [misc]progress:  [2/2] Setting up program.
* [misc]progress:  [Phase 2 of 3] Improving.
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (154 enodes)
* * [misc]simplify:  iters left: 2 (392 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (cos (/ K 2)) (* -2 J)))
* * [misc]progress:  iteration 1 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 2 1 2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 1)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U J)) 0) (* 0 (* 1/2 (/ U J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/8 in J
* [misc]backup-simplify:  Simplify 1/8 into 1/8
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (cos (* 1/2 K))) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/8 (pow (cos (* 1/2 K)) 2)) into (/ 1/8 (pow (cos (* 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/8 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))))) (* 2 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/8 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 0) (* 0 (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]taylor:  Taking taylor expansion of (/ (cos (/ 1/2 K)) J) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (cos (/ 1/2 K)) (/ 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ (cos (/ 1/2 K)) J))))) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (cos (/ 1/2 (/ 1 K)))) (* 1 (* (/ 1 J) (/ 1 (/ 1 U))))) into (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 0) (* 0 (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]taylor:  Taking taylor expansion of (/ (cos (/ -1/2 K)) J) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (cos (/ -1/2 K)) (/ 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ (cos (/ -1/2 K)) J))))) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* (/ 1 (- J)) (/ 1 (/ 1 (- U)))))) into (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 J) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 J) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U J)) 0) (* 0 (* 1/2 (/ U J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (* -2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (* 0 (* 1/2 (/ U (cos (* 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 1) (* 0 0)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (cos (* 1/2 K)))) into (- (* 2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* (- (* 2 (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K)))))) into (- U)
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))) (* 0 (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ U (cos (* 1/2 K)))))) into (/ (cos (* 1/2 K)) U)
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 (/ (cos (* 1/2 K)) U)) (+ (* (- (* 2 (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]approximate:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 0) (* 0 (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (* -2 1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 K))) 1) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (* 0 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 1/2 (* U (cos (/ 1/2 K))))) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (+ (* 0 0) (* 0 1))) into (- (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K))))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (pow U 2) (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (* (pow U 2) (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* U U) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (pow U 2) (cos (/ 1/2 K))) into (* (pow U 2) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1 (* (pow U 2) (cos (/ 1/2 K)))) into (/ 1 (* (pow U 2) (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K))))) into (/ 1/4 (* (pow U 2) (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 1/4 (* (pow U 2) (cos (/ 1/2 K))))) into (- (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K))))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K))))) in U
* [misc]taylor:  Taking taylor expansion of 1/4 in U
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (pow U 2) (cos (/ 1/2 K)))) in U
* [misc]taylor:  Taking taylor expansion of (* (pow U 2) (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 (cos (/ 1/2 K))) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) 0) (* 0 (/ 1/2 (* U (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (+ (* 0 (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow U 2) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (pow U 2) (cos (/ 1/2 K)))) (/ 0 (* (pow U 2) (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (* (pow U 2) (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 (/ 1 K)))) (* 1 (* 1 (/ 1 (/ 1 J))))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 0) (* 0 (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (* -2 -1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 K))) 1) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (* 0 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))) into (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (* U U) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (pow U 2)) into (* (cos (/ -1/2 K)) (pow U 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) into (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) into (/ 1/4 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (* (cos (/ -1/2 K)) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of 1/4 in U
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/4 (cos (/ -1/2 K))) into (/ 1/4 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/4 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ -1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (+ (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (pow U 2))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) (/ 0 (* (cos (/ -1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/4 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* 1 (/ 1 (/ 1 (- J)))))) into (* -2 (* (cos (* 1/2 K)) J))
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 2 1 2)
* [misc]approximate:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (cos (* 1/2 K))) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (* 1/2 K)) 2)) into (/ 1/4 (pow (cos (* 1/2 K)) 2))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (* 1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (/ 1/4 1) into 1/4
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/4 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (+ (* 0 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (+ (* 1 (- 1/8)) (+ (* 0 0) (* (- 1/8) 1))) into -1/4
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/4 (/ -1/4 1)) (* 0 (/ 0 1)))) into 1/16
* [misc]backup-simplify:  Simplify 1/16 into 1/16
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (+ (* 0 0) (* 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 1/2 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 (- 1/8)) (+ (* (- 1/8) 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/4 (/ 0 1)) (* 0 (/ -1/4 1)) (* 1/16 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 4) 24)) 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 1))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 2) 2) (/ (pow 0 1) 1)) 0 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 0))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1/16 (pow (* K (* (/ 1 J) U)) 2)) (* 1/4 (pow (* 1 (* (/ 1 J) U)) 2))) into (+ (* 1/16 (/ (* (pow K 2) (pow U 2)) (pow J 2))) (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]approximate:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 2)) into (/ 1 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ 1/2 K)) 2))) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ 1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ 1/2 K)) 2)) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ 1/2 K)) 2)) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/4 (pow (cos (/ 1/2 (/ 1 K))) 2)) (pow (* 1 (* (/ 1 J) (/ 1 (/ 1 U)))) 2)) into (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]approximate:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 2)) into (/ 1 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ -1/2 K)) 2))) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ -1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ -1/2 K)) 2)) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ -1/2 K)) 2)) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/4 (pow (cos (/ -1/2 (/ 1 (- K)))) 2)) (pow (* 1 (* (/ 1 (- J)) (/ 1 (/ 1 (- U))))) 2)) into (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 1)
* [misc]approximate:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 J) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 1) (* 0 0)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (cos (* 1/2 K)))) into (- (* 2 (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (- 2) into -2
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* -2 (* 1 J)) into (* -2 J)
* [misc]approximate:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 (/ 1 K)))) (* 1 (/ 1 (/ 1 J)))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 -1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (/ 1 (/ 1 (- J))))) into (* -2 (* (cos (* 1/2 K)) J))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2)))>
* * * * [misc]progress:  [ 2 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1)))>
* * * * [misc]progress:  [ 3 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 4 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 5 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 6 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 7 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]progress:  [ 8 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]progress:  [ 9 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 10 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (204 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 11 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (189 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4)))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (/ (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 12 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 13 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (102 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (fabs (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 14 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 15 / 79 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (154 enodes)
* * [misc]simplify:  iters left: 2 (392 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (cos (/ K 2)) (* -2 J)))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (cos (/ K 2)) (* -2 J))) 1))
* * * * [misc]progress:  [ 16 / 79 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1))>
* [enter]simplify:  Simplifying (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (154 enodes)
* * [misc]simplify:  iters left: 2 (392 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (cos (/ K 2)) (* -2 J)))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (* (cos (/ K 2)) (* -2 J))) 1))
* * * * [misc]progress:  [ 17 / 79 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1))>
* * * * [misc]progress:  [ 18 / 79 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (69 enodes)
* * [misc]simplify:  iters left: 3 (152 enodes)
* * [misc]simplify:  iters left: 2 (405 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))))))
* * * * [misc]progress:  [ 19 / 79 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (* (* -2 J) (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (+ (log (* (* -2 J) (cos (/ K 2)))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (68 enodes)
* * [misc]simplify:  iters left: 3 (153 enodes)
* * [misc]simplify:  iters left: 2 (405 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (log (* (cos (/ K 2)) (* -2 J))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (log (* (cos (/ K 2)) (* -2 J))))))
* * * * [misc]progress:  [ 20 / 79 ] simplifiying candidate #<alt (λ (J K U) (exp (log (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 21 / 79 ] simplifiying candidate #<alt (λ (J K U) (log (exp (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 22 / 79 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (53 enodes)
* * [misc]simplify:  iters left: 4 (183 enodes)
* [exit]simplify:  Simplified to (* (+ (* (* (* (cos (/ K 2)) (cos (/ K 2))) (* (* -8 (pow J 3)) (cos (/ K 2)))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (* -8 (pow J 3)) (cos (/ K 2))))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (+ (* (* (* (cos (/ K 2)) (cos (/ K 2))) (* (* -8 (pow J 3)) (cos (/ K 2)))) (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (* -8 (pow J 3)) (cos (/ K 2))))) (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 23 / 79 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* (* -2 J) (cos (/ K 2))) (* (* -2 J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* -2 J) (cos (/ K 2))) (* (* -2 J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (154 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (+ (* (pow (* (cos (/ K 2)) (* -2 J)) 3) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) (pow (* (cos (/ K 2)) (* -2 J)) 3)))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)) (+ (* (pow (* (cos (/ K 2)) (* -2 J)) 3) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) (pow (* (cos (/ K 2)) (* -2 J)) 3)))))
* * * * [misc]progress:  [ 24 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 25 / 79 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 26 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 27 / 79 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 28 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 29 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 30 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 31 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt 1)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (102 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt 1)) (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 32 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 33 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (102 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) 1) (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 34 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* -2 J)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (4 enodes)
* [exit]simplify:  Simplified to (* -2 J)
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 35 / 79 ] simplifiying candidate #<alt (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (91 enodes)
* * [misc]simplify:  iters left: 3 (306 enodes)
* [exit]simplify:  Simplified to (sqrt (- (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) (- (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (sqrt (- (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) (- (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 36 / 79 ] simplifiying candidate #<alt (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (128 enodes)
* * [misc]simplify:  iters left: 2 (487 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (/ (* (* (* -2 J) (cos (/ K 2))) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 37 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (* (* -2 J) (cos (/ K 2)))))>
* * * * [misc]progress:  [ 38 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (40 enodes)
* * [misc]simplify:  iters left: 3 (70 enodes)
* * [misc]simplify:  iters left: 2 (135 enodes)
* * [misc]simplify:  iters left: 1 (298 enodes)
* [exit]simplify:  Simplified to (* 2 (log (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 2 1 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* 2 (log (/ (/ U (* J 2)) (cos (/ K 2))))))))))
* * * * [misc]progress:  [ 39 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2))))))>
* * * * [misc]progress:  [ 40 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) (* 1 2))))))>
* [enter]simplify:  Simplifying (/ U (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (26 enodes)
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 2 1 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ (/ U (* J 2)) (cos (/ K 2))) (* 1 2))))))
* * * * [misc]progress:  [ 41 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (pow (* (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) (cbrt (/ U (* (* 2 J) (cos (/ K 2)))))) 2) (pow (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (pow (* (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) (cbrt (/ U (* (* 2 J) (cos (/ K 2)))))) 2)
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (41 enodes)
* * [misc]simplify:  iters left: 1 (59 enodes)
* [exit]simplify:  Simplified to (* (/ (/ U (* J 2)) (cos (/ K 2))) (cbrt (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 2 1 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (* (/ (/ U (* J 2)) (cos (/ K 2))) (cbrt (/ (/ U (* J 2)) (cos (/ K 2))))) (pow (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) 2))))))
* * * * [misc]progress:  [ 42 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2) (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (40 enodes)
* * [misc]simplify:  iters left: 1 (46 enodes)
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 2 1 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (/ (/ U (* J 2)) (cos (/ K 2))) (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2))))))
* * * * [misc]progress:  [ 43 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (pow 1 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (pow 1 2)
* * [misc]simplify:  iters left: 1 (3 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 1 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 44 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (pow U 2) (pow (/ 1 (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (pow U 2)
* * [misc]simplify:  iters left: 1 (3 enodes)
* [exit]simplify:  Simplified to (* U U)
* [misc]simplify:  Simplified (2 2 1 2 1) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (* U U) (pow (/ 1 (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 45 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (/ U (* (* 2 J) (cos (/ K 2)))) (/ U (* (* 2 J) (cos (/ K 2)))))))))>
* * * * [misc]progress:  [ 46 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 1)))))>
* * * * [misc]progress:  [ 47 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (exp (log (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 48 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (log (exp (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 49 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (* (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 50 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (cbrt (* (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 51 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 52 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 53 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (pow (* (* -2 J) (cos (/ K 2))) 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (* (* -2 J) (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (8 enodes)
* * [misc]simplify:  iters left: 4 (12 enodes)
* * [misc]simplify:  iters left: 3 (18 enodes)
* * [misc]simplify:  iters left: 2 (19 enodes)
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (* -2 J))
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (pow (* (cos (/ K 2)) (* -2 J)) 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * * * [misc]progress:  [ 54 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (pow (* (* -2 J) (cos (/ K 2))) 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* * * * [misc]progress:  [ 55 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (exp (+ (log (* -2 J)) (log (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (+ (log (* -2 J)) (log (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (20 enodes)
* * [misc]simplify:  iters left: 3 (24 enodes)
* [exit]simplify:  Simplified to (+ (log (* -2 J)) (log (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (exp (+ (log (* -2 J)) (log (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * * * [misc]progress:  [ 56 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (exp (log (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* * * * [misc]progress:  [ 57 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (log (exp (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* * * * [misc]progress:  [ 58 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (cbrt (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (79 enodes)
* * [misc]simplify:  iters left: 3 (245 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (cos (/ K 2))) (* (* (* -8 J) (* J J)) (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (cbrt (* (* (cos (/ K 2)) (cos (/ K 2))) (* (* (* -8 J) (* J J)) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * * * [misc]progress:  [ 59 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (cbrt (* (* -2 J) (cos (/ K 2)))) (cbrt (* (* -2 J) (cos (/ K 2))))) (cbrt (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* * * * [misc]progress:  [ 60 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (cbrt (* (* (* (* -2 J) (cos (/ K 2))) (* (* -2 J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* * * * [misc]progress:  [ 61 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (sqrt (* (* -2 J) (cos (/ K 2)))) (sqrt (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* * * * [misc]progress:  [ 62 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* 1 (* (* -2 J) (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* * * * [misc]progress:  [ 63 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (cbrt (cos (/ K 2)))
* * [misc]simplify:  iters left: 4 (5 enodes)
* [exit]simplify:  Simplified to (cbrt (cos (/ K 2)))
* [misc]simplify:  Simplified (2 1 2) to (λ (J K U) (* (* (* (* -2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * * * [misc]progress:  [ 64 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (sqrt (cos (/ K 2)))
* * [misc]simplify:  iters left: 4 (5 enodes)
* [exit]simplify:  Simplified to (sqrt (cos (/ K 2)))
* [misc]simplify:  Simplified (2 1 2) to (λ (J K U) (* (* (* (* -2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * * * [misc]progress:  [ 65 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) 1) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (cos (/ K 2))
* * [misc]simplify:  iters left: 3 (4 enodes)
* [exit]simplify:  Simplified to (cos (/ K 2))
* [misc]simplify:  Simplified (2 1 2) to (λ (J K U) (* (* (* (* -2 J) 1) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * * * [misc]progress:  [ 66 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 (* J (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* * * * [misc]progress:  [ 67 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (cos (/ K 2)) (* -2 J)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* * * * [misc]progress:  [ 68 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) 1))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) 1))
* * * * [misc]progress:  [ 69 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))>
* [enter]simplify:  Simplifying (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (68 enodes)
* * [misc]simplify:  iters left: 1 (81 enodes)
* [exit]simplify:  Simplified to (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))))
* * * * [misc]progress:  [ 70 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))>
* [enter]simplify:  Simplifying (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (68 enodes)
* * [misc]simplify:  iters left: 1 (81 enodes)
* [exit]simplify:  Simplified to (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))))
* * * * [misc]progress:  [ 71 / 79 ] simplifiying candidate #<alt (λ (J K U) 0)>
* [enter]simplify:  Simplifying 0
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 0
* [misc]simplify:  Simplified (2) to (λ (J K U) 0)
* * * * [misc]progress:  [ 72 / 79 ] simplifiying candidate #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J -2))
* [misc]simplify:  Simplified (2) to (λ (J K U) (* (cos (* K 1/2)) (* J -2)))
* * * * [misc]progress:  [ 73 / 79 ] simplifiying candidate #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J -2))
* [misc]simplify:  Simplified (2) to (λ (J K U) (* (cos (* K 1/2)) (* J -2)))
* * * * [misc]progress:  [ 74 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (+ (* 1/16 (/ (* (pow K 2) (pow U 2)) (pow J 2))) (* 1/4 (/ (pow U 2) (pow J 2))))))))>
* [enter]simplify:  Simplifying (+ (* 1/16 (/ (* (pow K 2) (pow U 2)) (pow J 2))) (* 1/4 (/ (pow U 2) (pow J 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (28 enodes)
* * [misc]simplify:  iters left: 4 (77 enodes)
* * [misc]simplify:  iters left: 3 (265 enodes)
* [exit]simplify:  Simplified to (* (/ U (/ J U)) (+ (/ 1/4 J) (/ (* K K) (/ J 1/16))))
* [misc]simplify:  Simplified (2 2 1 2) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (/ U (/ J U)) (+ (/ 1/4 J) (/ (* K K) (/ J 1/16))))))))
* * * * [misc]progress:  [ 75 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2))))))))>
* [enter]simplify:  Simplifying (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (63 enodes)
* * [misc]simplify:  iters left: 3 (239 enodes)
* [exit]simplify:  Simplified to (/ (/ 1/4 (* (/ J U) (/ J U))) (* (cos (* 1/2 K)) (cos (* 1/2 K))))
* [misc]simplify:  Simplified (2 2 1 2) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (/ (/ 1/4 (* (/ J U) (/ J U))) (* (cos (* 1/2 K)) (cos (* 1/2 K))))))))
* * * * [misc]progress:  [ 76 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2))))))))>
* [enter]simplify:  Simplifying (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (63 enodes)
* * [misc]simplify:  iters left: 3 (239 enodes)
* [exit]simplify:  Simplified to (/ (/ 1/4 (* (/ J U) (/ J U))) (* (cos (* 1/2 K)) (cos (* 1/2 K))))
* [misc]simplify:  Simplified (2 2 1 2) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (/ (/ 1/4 (* (/ J U) (/ J U))) (* (cos (* 1/2 K)) (cos (* 1/2 K))))))))
* * * * [misc]progress:  [ 77 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (* -2 J)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (4 enodes)
* [exit]simplify:  Simplified to (* -2 J)
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (* -2 J) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * * * [misc]progress:  [ 78 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 (* (cos (* 1/2 K)) J)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J -2))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (* (cos (* K 1/2)) (* J -2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * * * [misc]progress:  [ 79 / 79 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 (* (cos (* 1/2 K)) J)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J -2))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (* (cos (* K 1/2)) (* J -2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 2 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2 2)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 2 2 1 2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 2 2 1 2 1 2)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U J)) 0) (* 0 (* 1/2 (/ U J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/8 in J
* [misc]backup-simplify:  Simplify 1/8 into 1/8
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (cos (* 1/2 K))) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/8 (pow (cos (* 1/2 K)) 2)) into (/ 1/8 (pow (cos (* 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/8 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))))) (* 2 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/8 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 0) (* 0 (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]taylor:  Taking taylor expansion of (/ (cos (/ 1/2 K)) J) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (cos (/ 1/2 K)) (/ 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ (cos (/ 1/2 K)) J))))) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (cos (/ 1/2 (/ 1 K)))) (* 1 (* (/ 1 J) (/ 1 (/ 1 U))))) into (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 0) (* 0 (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]taylor:  Taking taylor expansion of (/ (cos (/ -1/2 K)) J) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (cos (/ -1/2 K)) (/ 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ (cos (/ -1/2 K)) J))))) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* (/ 1 (- J)) (/ 1 (/ 1 (- U)))))) into (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 J) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 J) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U J)) 0) (* 0 (* 1/2 (/ U J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (* -2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/2 U)
* [misc]backup-simplify:  Simplify (* 0 (* 1/2 U)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 1) (* 0 0)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (* 1/2 U))) into (- U)
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))) (* 0 (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ U (cos (* 1/2 K)))))) into (/ (cos (* 1/2 K)) U)
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) (/ (cos (* 1/2 K)) U)) (+ (* 0 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K))))))) into (/ (pow (cos (* 1/2 K)) 2) U)
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 (/ (pow (cos (* 1/2 K)) 2) U)) (+ (* -2 0) (* 0 (* 1/2 U)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]approximate:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 0) (* 0 (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (* -2 1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 1/2 (* U (cos (/ 1/2 K))))) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (+ (* 0 0) (* 0 1))) into (* 1/8 (/ 1 (* (pow U 2) (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 (* 1/8 (/ 1 (* (pow U 2) (cos (/ 1/2 K)))))) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into (- (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K))))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (pow U 2) (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (* (pow U 2) (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* U U) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (pow U 2) (cos (/ 1/2 K))) into (* (pow U 2) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1 (* (pow U 2) (cos (/ 1/2 K)))) into (/ 1 (* (pow U 2) (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K))))) into (/ 1/4 (* (pow U 2) (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 1/4 (* (pow U 2) (cos (/ 1/2 K))))) into (- (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K))))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (pow U 2) (cos (/ 1/2 K))))) in U
* [misc]taylor:  Taking taylor expansion of 1/4 in U
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (pow U 2) (cos (/ 1/2 K)))) in U
* [misc]taylor:  Taking taylor expansion of (* (pow U 2) (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 (cos (/ 1/2 K))) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (/ 1/2 K)))) (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 0 (* 2 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* U (cos (/ 1/2 K)))) 0) (* 0 (/ 1/2 (* U (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 (* 1/8 (/ 1 (* (pow U 2) (cos (/ 1/2 K)))))) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow U 2) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (pow U 2) (cos (/ 1/2 K)))) (/ 0 (* (pow U 2) (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (* (pow U 2) (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 (/ 1 K)))) (* 1 (* 1 (/ 1 (/ 1 J))))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 0) (* 0 (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (* -2 -1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))) into (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (* U U) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (pow U 2)) into (* (cos (/ -1/2 K)) (pow U 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) into (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) into (/ 1/4 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (* (cos (/ -1/2 K)) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of 1/4 in U
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/4 (cos (/ -1/2 K))) into (/ 1/4 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/4 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (cos (/ -1/2 K)))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (* -2 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ -1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* U 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (pow U 2))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) (/ 0 (* (cos (/ -1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/4 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* 1 (/ 1 (/ 1 (- J)))))) into (* -2 (* (cos (* 1/2 K)) J))
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 2 2 1 2)
* [misc]approximate:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (cos (* 1/2 K))) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (* 1/2 K)) 2)) into (/ 1/4 (pow (cos (* 1/2 K)) 2))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (* 1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (/ 1/4 1) into 1/4
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/4 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (+ (* 0 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (+ (* 1 (- 1/8)) (+ (* 0 0) (* (- 1/8) 1))) into -1/4
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/4 (/ -1/4 1)) (* 0 (/ 0 1)))) into 1/16
* [misc]backup-simplify:  Simplify 1/16 into 1/16
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (+ (* 0 0) (* 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 1/2 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 (- 1/8)) (+ (* (- 1/8) 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/4 (/ 0 1)) (* 0 (/ -1/4 1)) (* 1/16 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 4) 24)) 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 1))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 2) 2) (/ (pow 0 1) 1)) 0 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 0))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))) (* 0 (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1/16 (pow (* K (* (/ 1 J) U)) 2)) (* 1/4 (pow (* 1 (* (/ 1 J) U)) 2))) into (+ (* 1/16 (/ (* (pow K 2) (pow U 2)) (pow J 2))) (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]approximate:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 2)) into (/ 1 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ 1/2 K)) 2))) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ 1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ 1/2 K)) 2)) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ 1/2 K)) 2)) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/4 (pow (cos (/ 1/2 (/ 1 K))) 2)) (pow (* 1 (* (/ 1 J) (/ 1 (/ 1 U)))) 2)) into (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]approximate:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 2)) into (/ 1 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ -1/2 K)) 2))) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ -1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ -1/2 K)) 2)) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ -1/2 K)) 2)) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/4 (pow (cos (/ -1/2 (/ 1 (- K)))) 2)) (pow (* 1 (* (/ 1 (- J)) (/ 1 (/ 1 (- U))))) 2)) into (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 2 2 1 2 1 2)
* [misc]approximate:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 2 (* 1 J)) into (* 2 J)
* [misc]approximate:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ 1/2 (/ 1 K)))) (* 1 (/ 1 (/ 1 J)))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (/ 1 (/ 1 (- J))))) into (* 2 (* (cos (* 1/2 K)) J))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2))))>
* * * * [misc]progress:  [ 2 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1))))>
* * * * [misc]progress:  [ 3 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 4 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 5 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 6 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 7 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 8 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 9 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]progress:  [ 10 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (204 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3))))
* [misc]simplify:  Simplified (2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (/ (sqrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))
* * * * [misc]progress:  [ 11 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (189 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4)))
* [misc]simplify:  Simplified (2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (/ (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]progress:  [ 12 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 13 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (102 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (fabs (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))))
* * * * [misc]progress:  [ 14 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 15 / 74 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) 1))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (155 enodes)
* * [misc]simplify:  iters left: 2 (394 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* -2 J)) (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (cos (/ K 2)) (* -2 J)) (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) 1))
* * * * [misc]progress:  [ 16 / 74 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) 1))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (155 enodes)
* * [misc]simplify:  iters left: 2 (394 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* -2 J)) (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (cos (/ K 2)) (* -2 J)) (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) 1))
* * * * [misc]progress:  [ 17 / 74 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) 1))>
* * * * [misc]progress:  [ 18 / 74 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (* -2 J)) (+ (log (cos (/ K 2))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (+ (log (* -2 J)) (+ (log (cos (/ K 2))) (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (69 enodes)
* * [misc]simplify:  iters left: 3 (155 enodes)
* * [misc]simplify:  iters left: 2 (398 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (+ (log (* -2 J)) (log (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (+ (log (* -2 J)) (log (cos (/ K 2)))))))
* * * * [misc]progress:  [ 19 / 74 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (* -2 J)) (log (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (+ (log (* -2 J)) (log (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (66 enodes)
* * [misc]simplify:  iters left: 3 (150 enodes)
* * [misc]simplify:  iters left: 2 (391 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (+ (log (* -2 J)) (log (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (sqrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (+ (log (* -2 J)) (log (cos (/ K 2)))))))
* * * * [misc]progress:  [ 20 / 74 ] simplifiying candidate #<alt (λ (J K U) (exp (log (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 21 / 74 ] simplifiying candidate #<alt (λ (J K U) (log (exp (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 22 / 74 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (53 enodes)
* * [misc]simplify:  iters left: 4 (182 enodes)
* [exit]simplify:  Simplified to (* (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (* (* -8 (pow J 3)) (cos (/ K 2))) (* (cos (/ K 2)) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (* (* -8 (pow J 3)) (cos (/ K 2))) (* (cos (/ K 2)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 23 / 74 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (151 enodes)
* [exit]simplify:  Simplified to (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* (* (* 4 J) J) (cos (/ K 2))) (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1))) (* (* (* (* 4 J) J) (cos (/ K 2))) (* (+ (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))) 1) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 24 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* (cbrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 25 / 74 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 26 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 27 / 74 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 28 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (102 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 29 / 74 ] simplifiying candidate #<alt (λ (J K U) (* -2 (* J (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 30 / 74 ] simplifiying candidate #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (91 enodes)
* * [misc]simplify:  iters left: 3 (306 enodes)
* [exit]simplify:  Simplified to (sqrt (- (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) (- (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))) (sqrt (- (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) (- (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1)))))
* * * * [misc]progress:  [ 31 / 74 ] simplifiying candidate #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))>
* [enter]simplify:  Simplifying (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (46 enodes)
* * [misc]simplify:  iters left: 3 (128 enodes)
* * [misc]simplify:  iters left: 2 (487 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 32 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* -2 J)))>
* * * * [misc]progress:  [ 33 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2)))))))>
* [enter]simplify:  Simplifying (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (40 enodes)
* * [misc]simplify:  iters left: 3 (70 enodes)
* * [misc]simplify:  iters left: 2 (135 enodes)
* * [misc]simplify:  iters left: 1 (298 enodes)
* [exit]simplify:  Simplified to (* 2 (log (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 2 2 1 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* 2 (log (/ (/ U (* J 2)) (cos (/ K 2)))))))))))
* * * * [misc]progress:  [ 34 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (* (log (/ U (* (* 2 J) (cos (/ K 2))))) 2)))))))>
* * * * [misc]progress:  [ 35 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) (* 1 2)))))))>
* [enter]simplify:  Simplifying (/ U (* (* 2 J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (26 enodes)
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 2 2 1 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ (/ U (* J 2)) (cos (/ K 2))) (* 1 2)))))))
* * * * [misc]progress:  [ 36 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (pow (* (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) (cbrt (/ U (* (* 2 J) (cos (/ K 2)))))) 2) (pow (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)))))))>
* [enter]simplify:  Simplifying (pow (* (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) (cbrt (/ U (* (* 2 J) (cos (/ K 2)))))) 2)
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (41 enodes)
* * [misc]simplify:  iters left: 1 (59 enodes)
* [exit]simplify:  Simplified to (* (/ (/ U (* J 2)) (cos (/ K 2))) (cbrt (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 2 2 1 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (* (/ (/ U (* J 2)) (cos (/ K 2))) (cbrt (/ (/ U (* J 2)) (cos (/ K 2))))) (pow (cbrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)))))))
* * * * [misc]progress:  [ 37 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2) (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)))))))>
* [enter]simplify:  Simplifying (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (40 enodes)
* * [misc]simplify:  iters left: 1 (46 enodes)
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 2 2 1 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (/ (/ U (* J 2)) (cos (/ K 2))) (pow (sqrt (/ U (* (* 2 J) (cos (/ K 2))))) 2)))))))
* * * * [misc]progress:  [ 38 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (pow 1 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (pow 1 2)
* * [misc]simplify:  iters left: 1 (3 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 2 1 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]progress:  [ 39 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (pow U 2) (pow (/ 1 (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (pow U 2)
* * [misc]simplify:  iters left: 1 (3 enodes)
* [exit]simplify:  Simplified to (* U U)
* [misc]simplify:  Simplified (2 2 2 1 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (* U U) (pow (/ 1 (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]progress:  [ 40 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (/ U (* (* 2 J) (cos (/ K 2)))) (/ U (* (* 2 J) (cos (/ K 2))))))))))>
* * * * [misc]progress:  [ 41 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 1))))))>
* * * * [misc]progress:  [ 42 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (exp (log (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 43 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (log (exp (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 44 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (* (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 45 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (cbrt (* (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 46 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (sqrt (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 47 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 48 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (pow (* (* 2 J) (cos (/ K 2))) 1)) 2))))))>
* [enter]simplify:  Simplifying (* (* 2 J) (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (7 enodes)
* * [misc]simplify:  iters left: 4 (11 enodes)
* * [misc]simplify:  iters left: 3 (17 enodes)
* * [misc]simplify:  iters left: 2 (19 enodes)
* [exit]simplify:  Simplified to (* (* 2 J) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 2 2 1 2 1 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (pow (* (* 2 J) (cos (/ K 2))) 1)) 2))))))
* * * * [misc]progress:  [ 49 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (pow (* (* 2 J) (cos (/ K 2))) 1)) 2))))))>
* * * * [misc]progress:  [ 50 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (exp (+ (log (* 2 J)) (log (cos (/ K 2)))))) 2))))))>
* [enter]simplify:  Simplifying (+ (log (* 2 J)) (log (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (14 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (24 enodes)
* [exit]simplify:  Simplified to (+ (log (* 2 J)) (log (cos (/ K 2))))
* [misc]simplify:  Simplified (2 2 2 1 2 1 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (exp (+ (log (* 2 J)) (log (cos (/ K 2)))))) 2))))))
* * * * [misc]progress:  [ 51 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (exp (log (* (* 2 J) (cos (/ K 2)))))) 2))))))>
* * * * [misc]progress:  [ 52 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (log (exp (* (* 2 J) (cos (/ K 2)))))) 2))))))>
* * * * [misc]progress:  [ 53 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (cbrt (* (* (* (* 2 J) (* 2 J)) (* 2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))))) 2))))))>
* [enter]simplify:  Simplifying (* (* (* (* 2 J) (* 2 J)) (* 2 J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (78 enodes)
* * [misc]simplify:  iters left: 3 (243 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (* (* J J) (* 8 J))) (* (cos (/ K 2)) (cos (/ K 2))))
* [misc]simplify:  Simplified (2 2 2 1 2 1 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (cbrt (* (* (cos (/ K 2)) (* (* J J) (* 8 J))) (* (cos (/ K 2)) (cos (/ K 2)))))) 2))))))
* * * * [misc]progress:  [ 54 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* (cbrt (* (* 2 J) (cos (/ K 2)))) (cbrt (* (* 2 J) (cos (/ K 2))))) (cbrt (* (* 2 J) (cos (/ K 2)))))) 2))))))>
* * * * [misc]progress:  [ 55 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (cbrt (* (* (* (* 2 J) (cos (/ K 2))) (* (* 2 J) (cos (/ K 2)))) (* (* 2 J) (cos (/ K 2)))))) 2))))))>
* * * * [misc]progress:  [ 56 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (sqrt (* (* 2 J) (cos (/ K 2)))) (sqrt (* (* 2 J) (cos (/ K 2)))))) 2))))))>
* * * * [misc]progress:  [ 57 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 1 (* (* 2 J) (cos (/ K 2))))) 2))))))>
* * * * [misc]progress:  [ 58 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (cbrt (cos (/ K 2)))
* * [misc]simplify:  iters left: 4 (5 enodes)
* [exit]simplify:  Simplified to (cbrt (cos (/ K 2)))
* [misc]simplify:  Simplified (2 2 2 1 2 1 2 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2))))) 2))))))
* * * * [misc]progress:  [ 59 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2))))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (cos (/ K 2)))
* * [misc]simplify:  iters left: 4 (5 enodes)
* [exit]simplify:  Simplified to (sqrt (cos (/ K 2)))
* [misc]simplify:  Simplified (2 2 2 1 2 1 2 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2))))) 2))))))
* * * * [misc]progress:  [ 60 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) 1) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (cos (/ K 2))
* * [misc]simplify:  iters left: 3 (4 enodes)
* [exit]simplify:  Simplified to (cos (/ K 2))
* [misc]simplify:  Simplified (2 2 2 1 2 1 2 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (* (* 2 J) 1) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 61 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 (* J (cos (/ K 2))))) 2))))))>
* * * * [misc]progress:  [ 62 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (cos (/ K 2)) (* 2 J))) 2))))))>
* * * * [misc]progress:  [ 63 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) 1)))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) 1)))
* * * * [misc]progress:  [ 64 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))>
* [enter]simplify:  Simplifying (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (68 enodes)
* * [misc]simplify:  iters left: 1 (81 enodes)
* [exit]simplify:  Simplified to (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (/ (/ (* 1/2 U) J) (cos (* 1/2 K))))))
* * * * [misc]progress:  [ 65 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))>
* [enter]simplify:  Simplifying (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (68 enodes)
* * [misc]simplify:  iters left: 1 (81 enodes)
* [exit]simplify:  Simplified to (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (/ (/ (* 1/2 U) J) (cos (* 1/2 K))))))
* * * * [misc]progress:  [ 66 / 74 ] simplifiying candidate #<alt (λ (J K U) 0)>
* [enter]simplify:  Simplifying 0
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 0
* [misc]simplify:  Simplified (2) to (λ (J K U) 0)
* * * * [misc]progress:  [ 67 / 74 ] simplifiying candidate #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J -2))
* [misc]simplify:  Simplified (2) to (λ (J K U) (* (cos (* K 1/2)) (* J -2)))
* * * * [misc]progress:  [ 68 / 74 ] simplifiying candidate #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J -2))
* [misc]simplify:  Simplified (2) to (λ (J K U) (* (cos (* K 1/2)) (* J -2)))
* * * * [misc]progress:  [ 69 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (+ (* 1/16 (/ (* (pow K 2) (pow U 2)) (pow J 2))) (* 1/4 (/ (pow U 2) (pow J 2)))))))))>
* [enter]simplify:  Simplifying (+ (* 1/16 (/ (* (pow K 2) (pow U 2)) (pow J 2))) (* 1/4 (/ (pow U 2) (pow J 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (28 enodes)
* * [misc]simplify:  iters left: 4 (77 enodes)
* * [misc]simplify:  iters left: 3 (265 enodes)
* [exit]simplify:  Simplified to (* (/ U (/ J U)) (+ (/ 1/4 J) (/ (* K K) (/ J 1/16))))
* [misc]simplify:  Simplified (2 2 2 1 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* (/ U (/ J U)) (+ (/ 1/4 J) (/ (* K K) (/ J 1/16)))))))))
* * * * [misc]progress:  [ 70 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))))))))>
* [enter]simplify:  Simplifying (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (63 enodes)
* * [misc]simplify:  iters left: 3 (239 enodes)
* [exit]simplify:  Simplified to (/ (/ 1/4 (* (/ J U) (/ J U))) (* (cos (* 1/2 K)) (cos (* 1/2 K))))
* [misc]simplify:  Simplified (2 2 2 1 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (/ (/ 1/4 (* (/ J U) (/ J U))) (* (cos (* 1/2 K)) (cos (* 1/2 K)))))))))
* * * * [misc]progress:  [ 71 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))))))))>
* [enter]simplify:  Simplifying (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (63 enodes)
* * [misc]simplify:  iters left: 3 (239 enodes)
* [exit]simplify:  Simplified to (/ (/ 1/4 (* (/ J U) (/ J U))) (* (cos (* 1/2 K)) (cos (* 1/2 K))))
* [misc]simplify:  Simplified (2 2 2 1 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (/ (/ 1/4 (* (/ J U) (/ J U))) (* (cos (* 1/2 K)) (cos (* 1/2 K)))))))))
* * * * [misc]progress:  [ 72 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 J)) 2))))))>
* [enter]simplify:  Simplifying (* 2 J)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (4 enodes)
* [exit]simplify:  Simplified to (* 2 J)
* [misc]simplify:  Simplified (2 2 2 1 2 1 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 J)) 2))))))
* * * * [misc]progress:  [ 73 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 (* (cos (* 1/2 K)) J))) 2))))))>
* [enter]simplify:  Simplifying (* 2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J 2))
* [misc]simplify:  Simplified (2 2 2 1 2 1 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (cos (* K 1/2)) (* J 2))) 2))))))
* * * * [misc]progress:  [ 74 / 74 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* 2 (* (cos (* 1/2 K)) J))) 2))))))>
* [enter]simplify:  Simplifying (* 2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J 2))
* [misc]simplify:  Simplified (2 2 2 1 2 1 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (sqrt (+ 1 (pow (/ U (* (cos (* K 1/2)) (* J 2))) 2))))))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 3 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2 2 2 1)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 2 2 1 1)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 2 2 2)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2 2 2 1)
* [misc]approximate:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log J)) (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))) into (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1) 1)))) into (/ 1/12 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/12 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/12 in J
* [misc]backup-simplify:  Simplify 1/12 into 1/12
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (cos (* 1/2 K))) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/12 (pow (cos (* 1/2 K)) 2)) into (/ 1/12 (pow (cos (* 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/12 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/12 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]approximate:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 1/2 (* U (cos (/ 1/2 K))))) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 2)) into (/ 1 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ 1/2 K)) 2))) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ 1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ 1/2 K)) 2)) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log J)) into (* 2 (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 2))) (* 1 (/ (* 1 (pow (* 2 1) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 1)))) 2) into (* 4 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (* 4 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into (* 4/3 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 4/3 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))) 1) 1)))) into (* 4/3 (/ (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (* 4/3 (/ (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 4/3 in J
* [misc]backup-simplify:  Simplify 4/3 into 4/3
* [misc]taylor:  Taking taylor expansion of (/ (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 2)) into (/ 1 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ 1/2 K)) 2))) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) into (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (/ (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) 1) into (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) 0) (+ (* 0 0) (* 0 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) 0) (* 0 (pow (cos (/ 1/2 K)) 2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 4/3 0) (+ (* 0 0) (* 0 (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log (/ 1 J))) (log (/ 1/4 (pow (cos (/ 1/2 (/ 1 K))) 2)))) (* 2 (log (/ 1 U)))))) into (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ 1 J)))) (* 2 (log (/ 1 U))))))
* [misc]approximate:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) into (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 2)) into (/ 1 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ -1/2 K)) 2))) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ -1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ -1/2 K)) 2)) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log J)) into (* 2 (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 2))) (* 1 (/ (* 1 (pow (* 2 1) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 1)))) 2) into (* 4 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (* 4 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (* 4/3 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 4/3 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) 1) 1)))) into (* 4/3 (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (* 4/3 (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 4/3 in J
* [misc]backup-simplify:  Simplify 4/3 into 4/3
* [misc]taylor:  Taking taylor expansion of (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 2)) into (/ 1 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ -1/2 K)) 2))) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) 1) into (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 2) 0) (+ (* 0 0) (* 0 (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 2) 0) (* 0 (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 4/3 0) (+ (* 0 0) (* 0 (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log (/ 1 (- J)))) (log (/ 1/4 (pow (cos (/ -1/2 (/ 1 (- K)))) 2)))) (* 2 (log (/ 1 (- U))))))) into (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ -1 J)))) (* 2 (log (/ -1 U))))))
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2 2 2 1 1)
* [misc]approximate:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ U (* 2 J)) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* 2 J)) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ U J)) 1) into (* 1/2 (/ U J))
* [misc]taylor:  Taking taylor expansion of (/ (/ U (* 2 J)) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* 2 J)) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ U J)) 1) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ U (* 2 J)) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* 2 J)) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) (cos (* 1/2 K))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (/ (/ U (* 2 J)) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* 2 J)) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) (cos (* 1/2 K))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log J)) (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))) into (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ U (* 2 J)) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* 2 J)) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ 1 (* 2 J)) into (/ 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 J) (cos (* 1/2 K))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (/ (/ U (* 2 J)) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* 2 J)) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ 1 (* 2 J)) into (/ 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 J) (cos (* 1/2 K))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ U (* 2 J)) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* 2 J)) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ 1 (* 2 J)) into (/ 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 J) (cos (* 1/2 K))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (/ (/ U (* 2 J)) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* 2 J)) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ 1 (* 2 J)) into (/ 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 J) (cos (* 1/2 K))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1) 1)))) into (/ 1/12 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/12 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/12 in J
* [misc]backup-simplify:  Simplify 1/12 into 1/12
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (cos (* 1/2 K))) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/12 (pow (cos (* 1/2 K)) 2)) into (/ 1/12 (pow (cos (* 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/12 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/12 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]approximate:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* 2 (/ 1 J))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (/ 2 J)) into (* 1/2 (/ J U))
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J U)) (cos (/ 1/2 K))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* 2 (/ 1 J))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (/ 2 J)) into (* 1/2 (/ J U))
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J U)) (cos (/ 1/2 K))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* 2 (/ 1 J))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 U) (cos (/ 1/2 K))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* 2 (/ 1 J))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 U) (cos (/ 1/2 K))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 1/2 (* U (cos (/ 1/2 K))))) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* 2 (/ 1 J))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (/ 1 (/ 2 J)) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ 1/2 K))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* 2 (/ 1 J))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (/ 1 (/ 2 J)) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ 1/2 K))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* 2 (/ 1 J))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (/ 1 (/ 2 J)) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ 1/2 K))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* 2 (/ 1 J))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (/ 1 (/ 2 J)) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ 1/2 K))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 2)) into (/ 1 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ 1/2 K)) 2))) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ 1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ 1/2 K)) 2)) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log J)) into (* 2 (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 2 J)) (+ (* (* 1/2 J) (/ 0 (/ 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 2 J)) (+ (* (* 1/2 J) (/ 0 (/ 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 2 J)) (+ (* (* 1/2 J) (/ 0 (/ 2 J))) (* 0 (/ 0 (/ 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 2 J)) (+ (* (* 1/2 J) (/ 0 (/ 2 J))) (* 0 (/ 0 (/ 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 2))) (* 1 (/ (* 1 (pow (* 2 1) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 1)))) 2) into (* 4 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (* 4 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into (* 4/3 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 4/3 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))) 1) 1)))) into (* 4/3 (/ (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (* 4/3 (/ (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 4/3 in J
* [misc]backup-simplify:  Simplify 4/3 into 4/3
* [misc]taylor:  Taking taylor expansion of (/ (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 2)) into (/ 1 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ 1/2 K)) 2))) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) into (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (/ (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) 1) into (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) 0) (+ (* 0 0) (* 0 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) 0) (* 0 (pow (cos (/ 1/2 K)) 2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 4/3 0) (+ (* 0 0) (* 0 (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log (/ 1 J))) (log (/ 1/4 (pow (cos (/ 1/2 (/ 1 K))) 2)))) (* 2 (log (/ 1 U)))))) into (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ 1 J)))) (* 2 (log (/ 1 U))))))
* [misc]approximate:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (/ -2 J)) into (* 1/2 (/ J U))
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J U)) (cos (/ -1/2 K))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (/ -2 J)) into (* 1/2 (/ J U))
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J U)) (cos (/ -1/2 K))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) into (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) -2) into (/ 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 U) (cos (/ -1/2 K))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) -2) into (/ 1/2 U)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (/ 1/2 U) (cos (/ -1/2 K))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (/ -1 (/ -2 J)) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ -1/2 K))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (/ -1 (/ -2 J)) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ -1/2 K))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (/ -1 (/ -2 J)) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ -1/2 K))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (/ -1 (/ -2 J)) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (* 1/2 J) (cos (/ -1/2 K))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 2)) into (/ 1 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ -1/2 K)) 2))) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ -1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ -1/2 K)) 2)) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log J)) into (* 2 (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ -2 J)) (+ (* (* 1/2 J) (/ 0 (/ -2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ -2 J)) (+ (* (* 1/2 J) (/ 0 (/ -2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ -2 J)) (+ (* (* 1/2 J) (/ 0 (/ -2 J))) (* 0 (/ 0 (/ -2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ -2 J)) (+ (* (* 1/2 J) (/ 0 (/ -2 J))) (* 0 (/ 0 (/ -2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 2))) (* 1 (/ (* 1 (pow (* 2 1) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 1)))) 2) into (* 4 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (* 4 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (* 4/3 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 4/3 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) 1) 1)))) into (* 4/3 (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (* 4/3 (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 4/3 in J
* [misc]backup-simplify:  Simplify 4/3 into 4/3
* [misc]taylor:  Taking taylor expansion of (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 2)) into (/ 1 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ -1/2 K)) 2))) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) 1) into (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 2) 0) (+ (* 0 0) (* 0 (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 2) 0) (* 0 (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 4/3 0) (+ (* 0 0) (* 0 (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log (/ 1 (- J)))) (log (/ 1/4 (pow (cos (/ -1/2 (/ 1 (- K)))) 2)))) (* 2 (log (/ 1 (- U))))))) into (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ -1 J)))) (* 2 (log (/ -1 U))))))
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 J) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 J) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/3)) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/6)
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U J)) 0) (* 0 (* 1/2 (/ U J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log J)) (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))) into (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))) into (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log J)) (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 J) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log J)) (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))) into (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))) into (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log J)) (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* -2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))) into (* (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (* (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))))) into (* (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))))
* [misc]backup-simplify:  Simplify (* 0 (* (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) 0) (* 0 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (* (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 1) (* 0 0)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (* (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))))) into (- (* 2 (* (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (* (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (* (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))) in K
* [misc]taylor:  Taking taylor expansion of (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) in K
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))) in K
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow U 2) (pow (cos (* 1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (* U U) into (pow U 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (/ (pow U 2) 1) into (pow U 2)
* [misc]backup-simplify:  Simplify (* 1/4 (pow U 2)) into (* 1/4 (pow U 2))
* [misc]backup-simplify:  Simplify (log (* 1/4 (pow U 2))) into (log (* 1/4 (pow U 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (* 2 (log J)) into (* 2 (log J))
* [misc]backup-simplify:  Simplify (- (* 2 (log J))) into (- (* 2 (log J)))
* [misc]backup-simplify:  Simplify (+ (log (* 1/4 (pow U 2))) (- (* 2 (log J)))) into (- (log (* 1/4 (pow U 2))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J)))) into (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))) into (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J)))))) into (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))))
* [misc]backup-simplify:  Simplify (+ (* U 0) (* 0 U)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow U 2) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (pow U 2))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (pow U 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log J))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* 1 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))
* [misc]backup-simplify:  Simplify (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))))) into (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J)))))))
* [misc]backup-simplify:  Simplify (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J)))))))) into (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))))))
* [misc]backup-simplify:  Simplify (- (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))))))) into (- (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J)))))))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))))))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J)))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J)))))) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (pow U 2))) (* 2 (log J))) in U
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/4 (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of 1/4 in U
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* 1/4 1) into 1/4
* [misc]backup-simplify:  Simplify (log 1/4) into (log 1/4)
* [misc]taylor:  Taking taylor expansion of (* 2 (log J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log U)) (log 1/4)) into (+ (log 1/4) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 2 (log J)) into (* 2 (log J))
* [misc]backup-simplify:  Simplify (- (* 2 (log J))) into (- (* 2 (log J)))
* [misc]backup-simplify:  Simplify (+ (+ (log 1/4) (* 2 (log U))) (- (* 2 (log J)))) into (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J)))) into (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))) into (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J)))))) into (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1/4 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log J))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))))) into (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J)))))))
* [misc]backup-simplify:  Simplify (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J)))))))) into (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))))))
* [misc]backup-simplify:  Simplify (- (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))))))) into (- (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J)))))))))
* [misc]backup-simplify:  Simplify (- (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))))))) into (- (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J)))))))))
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))) (* 0 (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) 2))) (* 1 (/ (* 1 (pow (* 2 1) 1)) (pow (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) 1)))) 2) into (* 4 (/ (pow (cos (* 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log J)) (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (* 4 (/ (pow (cos (* 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))) into (* 4/3 (/ (pow (cos (* 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 4/3 (/ (pow (cos (* 1/2 K)) 2) (pow U 2))) 1) 1)))) into (* 4/3 (/ (* (pow (cos (* 1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (* 4/3 (/ (* (pow (cos (* 1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))) (pow U 2))) (pow 0 2) (+)) (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))))) into (* 2/3 (* (/ (pow (cos (* 1/2 K)) 2) (pow U 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))))
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (* 2/3 (* (/ (pow (cos (* 1/2 K)) 2) (pow U 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))))) (+ (* 0 0) (* 0 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))))) into (* 2/3 (* (/ (* (pow (cos (* 1/2 K)) 2) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (pow U 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) (* 2/3 (* (/ (* (pow (cos (* 1/2 K)) 2) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (pow U 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))))) (+ (* 0 0) (* 0 (* (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))))))) into (* 2/3 (* (/ (* (pow (cos (* 1/2 K)) 3) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (pow U 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))))
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 (* 2/3 (* (/ (* (pow (cos (* 1/2 K)) 3) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (pow U 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))))) (+ (* -2 0) (* 0 (* (* (cos (* 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) 0) (* 0 (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (log (* 1/4 (pow U 2))) (* 2 (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) 0) (* 0 (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (- (* 2 (* (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))))))) (* 1 (* 1 J))) into (* -2 (* (* J (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))))))
* [misc]approximate:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/6)
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 0) (* 0 (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 1/2 (* U (cos (/ 1/2 K))))) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 J)) (* (cos (/ (/ 1 K) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))) (/ (/ (/ 1 U) (* 2 (/ 1 J))) (cos (/ (/ 1 K) 2))))))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 1/2 (* U (cos (/ 1/2 K))))) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (* -2 1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) 1) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))) into (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))) into (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))) into (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))) into (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))) into (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))) into (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 1/12 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1)))) into (/ 1/12 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/12 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/24 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (/ 1/24 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (+ (* 0 0) (* 0 1))) into (* 1/24 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) (* 1/24 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) (+ (* 0 0) (* 0 (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))))) into (* 1/24 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 (* 1/24 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K)))))) (+ (* 0 0) (* 0 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))))) into (- (* 1/12 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K))))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/12 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/12 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of 1/12 in K
* [misc]backup-simplify:  Simplify 1/12 into 1/12
* [misc]taylor:  Taking taylor expansion of (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (pow U 2) (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* U U) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (pow U 2) (cos (/ 1/2 K))) into (* (pow U 2) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K)))) into (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* 1/12 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K))))) into (* 1/12 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (* 1/12 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K)))))) into (- (* 1/12 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K))))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/12 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/12 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K))))) in U
* [misc]taylor:  Taking taylor expansion of 1/12 in U
* [misc]backup-simplify:  Simplify 1/12 into 1/12
* [misc]taylor:  Taking taylor expansion of (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (* (pow U 2) (cos (/ 1/2 K)))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]taylor:  Taking taylor expansion of (* (pow U 2) (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 (cos (/ 1/2 K))) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))) into (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/12 0) (+ (* 0 0) (* 0 (/ (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (* (fabs (cbrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (* (fabs (cbrt (+ (* 1/4 (/ (pow (/ 1 J) 2) (* (pow (/ 1 U) 2) (pow (cos (/ 1/2 (/ 1 K))) 2)))) 1))) (cos (/ 1/2 (/ 1 K))))) (* 1 (* 1 (/ 1 (/ 1 J))))) into (* -2 (* (cos (* 1/2 K)) (* J (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))))))
* [misc]approximate:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) into (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) into (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) into (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1/3)) into (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1/6)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 0) (* 0 (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) into (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* -2 (/ 1 (- J))) (* (cos (/ (/ 1 (- K)) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* -2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (* (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ 1 (- U)) (* 2 (/ 1 (- J)))) (cos (/ (/ 1 (- K)) 2))))))) into (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (* -2 -1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) 1) into (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) into (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) into (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) into (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))))
* [misc]taylor:  Taking taylor expansion of (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) into (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) into (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))))
* [misc]backup-simplify:  Simplify (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) into (* 2 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))))
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 -1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 1/12 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1)))) into (/ 1/12 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/12 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/24 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (/ 1/24 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))) into (* 1/24 (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) (* 1/24 (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (pow U 2) (pow (cos (/ -1/2 K)) 2))))) (+ (* 0 0) (* 0 (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))))) into (* 1/24 (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (pow U 2) (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 -1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 (* 1/24 (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (pow U 2) (cos (/ -1/2 K)))))) (+ (* 0 0) (* 0 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))))) into (* 1/12 (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (pow U 2) (cos (/ -1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (* 1/12 (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (pow U 2) (cos (/ -1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of 1/12 in K
* [misc]backup-simplify:  Simplify 1/12 into 1/12
* [misc]taylor:  Taking taylor expansion of (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (pow U 2) (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) in K
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) into (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]taylor:  Taking taylor expansion of (* (pow U 2) (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* U U) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (pow U 2) (cos (/ -1/2 K))) into (* (cos (/ -1/2 K)) (pow U 2))
* [misc]backup-simplify:  Simplify (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (cos (/ -1/2 K)) (pow U 2))) into (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (pow U 2) (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* 1/12 (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (pow U 2) (cos (/ -1/2 K))))) into (* 1/12 (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (cos (/ -1/2 K)) (pow U 2))))
* [misc]taylor:  Taking taylor expansion of (* 1/12 (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (cos (/ -1/2 K)) (pow U 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/12 in U
* [misc]backup-simplify:  Simplify 1/12 into 1/12
* [misc]taylor:  Taking taylor expansion of (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* (cos (/ -1/2 K)) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) in U
* [misc]backup-simplify:  Simplify (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) into (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (cos (/ -1/2 K))) into (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/12 0) (+ (* 0 0) (* 0 (/ (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (* (cos (/ -1/2 K)) (fabs (cbrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (* (cos (/ -1/2 (/ 1 (- K)))) (fabs (cbrt (+ 1 (* 1/4 (/ (pow (/ 1 (- J)) 2) (* (pow (cos (/ -1/2 (/ 1 (- K)))) 2) (pow (/ 1 (- U)) 2))))))))) (* 1 (* 1 (/ 1 (/ 1 (- J)))))) into (* -2 (* (cos (* 1/2 K)) (* J (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))))))
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 2 2 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/3)) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/6)
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U J)) 0) (* 0 (* 1/2 (/ U J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log J)) (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))) into (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))) into (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log J)) (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (* 2 (log J)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 1/12 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1) 1)))) into (/ 1/12 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/12 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/24 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/24 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/24 in J
* [misc]backup-simplify:  Simplify 1/24 into 1/24
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (cos (* 1/2 K))) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/24 (pow (cos (* 1/2 K)) 2)) into (/ 1/24 (pow (cos (* 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/24 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/24 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]approximate:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/6)
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 0) (* 0 (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 1/2 (* U (cos (/ 1/2 K))))) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 2)) into (/ 1 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ 1/2 K)) 2))) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ 1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ 1/2 K)) 2)) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log J)) into (* 2 (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 2))) (* 1 (/ (* 1 (pow (* 2 1) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 1)))) 2) into (* 4 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (* 4 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into (* 4/3 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 4/3 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))) 1) 1)))) into (* 4/3 (/ (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (pow J 2)))
* [misc]backup-simplify:  Simplify (/ (- (* 4/3 (/ (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (pow (cos (/ 1/2 K)) 2)) (pow J 2))) (pow 0 2) (+)) (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))))) into (* 2/3 (* (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))))))
* [misc]taylor:  Taking taylor expansion of (* 2/3 (* (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))))) in J
* [misc]taylor:  Taking taylor expansion of 2/3 in J
* [misc]backup-simplify:  Simplify 2/3 into 2/3
* [misc]taylor:  Taking taylor expansion of (* (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))))) in J
* [misc]taylor:  Taking taylor expansion of (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (/ (pow (cos (/ 1/2 K)) 2) 1) into (pow (cos (/ 1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 2)) into (/ 1 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ 1/2 K)) 2))) into (/ 1/4 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ 1/2 K)) 2) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ 1/2 K)) 2) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ 1/2 K)) 2) 0) (+ (* 0 0) (* 0 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ 1/2 K)) 2) 0) (* 0 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (* (pow (cos (/ 1/2 K)) 2) (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))))) into (* (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ (* 2/3 0) (+ (* 0 0) (* 0 (* (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ 1/2 K)) 2)) (/ 0 (pow (cos (/ 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ 1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ 1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (+ (* 2 (log (/ 1 J))) (log (/ 1/4 (pow (cos (/ 1/2 (/ 1 K))) 2)))) (* 2 (log (/ 1 U))))))) into (sqrt (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ 1 J)))) (* 2 (log (/ 1 U)))))))
* [misc]approximate:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) into (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1/3)
* [misc]backup-simplify:  Simplify (sqrt (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1/3)) into (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1/6)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 0) (* 0 (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1/3)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) 1)) (pow 1 1)))) 2) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 0))) into (* 1/12 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 2)) into (/ 1 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ -1/2 K)) 2))) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (pow (cos (/ -1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/4 (pow (cos (/ -1/2 K)) 2)) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log J)) into (* 2 (log J))
* [misc]backup-simplify:  Simplify (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1/4 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 2))) (* 1 (/ (* 1 (pow (* 2 1) 1)) (pow (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 1)))) 2) into (* 4 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* (- 2) (log U)) (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) into (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (* 4 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (* 4/3 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 4/3 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) 1) 1)))) into (* 4/3 (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (pow J 2)))
* [misc]backup-simplify:  Simplify (/ (- (* 4/3 (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) (pow J 2))) (pow 0 2) (+)) (* 2 (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into (* 2/3 (* (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))))
* [misc]taylor:  Taking taylor expansion of (* 2/3 (* (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) in J
* [misc]taylor:  Taking taylor expansion of 2/3 in J
* [misc]backup-simplify:  Simplify 2/3 into 2/3
* [misc]taylor:  Taking taylor expansion of (* (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)) (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))) in J
* [misc]taylor:  Taking taylor expansion of (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (/ (pow (cos (/ -1/2 K)) 2) 1) into (pow (cos (/ -1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (sqrt (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/4 in J
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 2)) into (/ 1 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (pow (cos (/ -1/2 K)) 2))) into (/ 1/4 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))) into (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -2) (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) into (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (- (* 2 (log U))) into (- (* 2 (log U)))
* [misc]backup-simplify:  Simplify (+ (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (- (* 2 (log U)))) into (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))) into (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ -1/2 K)) 2) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ -1/2 K)) 2) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 2) 0) (+ (* 0 0) (* 0 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 2) 0) (* 0 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]backup-simplify:  Simplify (* (pow (cos (/ -1/2 K)) 2) (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))))) into (* (pow (cos (/ -1/2 K)) 2) (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))
* [misc]backup-simplify:  Simplify (+ (* 2/3 0) (+ (* 0 0) (* 0 (* (pow (cos (/ -1/2 K)) 2) (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ -1/2 K)) 2)) (+ (* (/ 1 (pow (cos (/ -1/2 K)) 2)) (/ 0 (pow (cos (/ -1/2 K)) 2))) (* 0 (/ 0 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/4 (pow (cos (/ -1/2 K)) 2)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow 0 2) (+)) (* 2 (sqrt (exp (* 1/3 (- (+ (* 2 (log J)) (log (/ 1/4 (pow (cos (/ -1/2 K)) 2)))) (* 2 (log U)))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (sqrt (exp (* 1/3 (- (+ (* 2 (log (/ 1 (- J)))) (log (/ 1/4 (pow (cos (/ -1/2 (/ 1 (- K)))) 2)))) (* 2 (log (/ 1 (- U)))))))) into (sqrt (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ -1 J)))) (* 2 (log (/ -1 U)))))))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/3))))))>
* * * * [misc]progress:  [ 2 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (pow (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1))))))>
* * * * [misc]progress:  [ 3 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (exp (log (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 4 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (log (exp (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 5 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (* (cbrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (cbrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (cbrt (* (cbrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))) (cbrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [misc]simplify:  Simplified (2 2 2 2 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (* (cbrt (* (cbrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))) (cbrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))
* * * * [misc]progress:  [ 6 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 2 2 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (* (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))
* * * * [misc]progress:  [ 7 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (* (cbrt 1) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 2 2 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (* 1 (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))
* * * * [misc]progress:  [ 8 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (/ (cbrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (cbrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))))>
* [enter]simplify:  Simplifying (cbrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (204 enodes)
* [exit]simplify:  Simplified to (cbrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3))))
* [misc]simplify:  Simplified (2 2 2 2 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (/ (cbrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)))) (cbrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))))
* * * * [misc]progress:  [ 9 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (/ (cbrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (cbrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (189 enodes)
* [exit]simplify:  Simplified to (cbrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4)))
* [misc]simplify:  Simplified (2 2 2 2 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (/ (cbrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4))) (cbrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))
* * * * [misc]progress:  [ 10 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (* (* (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 11 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (* (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 12 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (* (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 13 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (* 1 (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* * * * [misc]progress:  [ 14 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (pow (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) 1/3)) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 15 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (pow (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) 1)) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 16 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (exp (log (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 17 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (log (exp (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 18 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (* (cbrt (* (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (cbrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (* (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (161 enodes)
* [exit]simplify:  Simplified to (cbrt (* (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))
* [misc]simplify:  Simplified (2 2 2 1 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (* (cbrt (* (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (cbrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 19 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (* (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (167 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 2 1 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (* (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 20 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (* (cbrt 1) (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 2 1 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (* 1 (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 21 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (/ (cbrt (+ (pow 1 3) (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3))) (cbrt (+ (* 1 1) (- (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) (* 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (+ (pow 1 3) (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (35 enodes)
* * [misc]simplify:  iters left: 4 (93 enodes)
* * [misc]simplify:  iters left: 3 (420 enodes)
* [exit]simplify:  Simplified to (cbrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3))))
* [misc]simplify:  Simplified (2 2 2 1 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (/ (cbrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)))) (cbrt (+ (* 1 1) (- (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))) (* 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 22 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (/ (cbrt (- (* 1 1) (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (- (* 1 1) (* (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (97 enodes)
* * [misc]simplify:  iters left: 3 (463 enodes)
* [exit]simplify:  Simplified to (cbrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4)))
* [misc]simplify:  Simplified (2 2 2 1 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (/ (cbrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4))) (cbrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 23 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (* (* (cbrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (cbrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 24 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (* (* (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 25 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (* (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 26 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (* 1 (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 27 / 77 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) 1))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (119 enodes)
* * [misc]simplify:  iters left: 3 (340 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 (cos (/ K 2))) (fabs (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))) (* (sqrt (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1))) J))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (* -2 (cos (/ K 2))) (fabs (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))) (* (sqrt (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1))) J)) 1))
* * * * [misc]progress:  [ 28 / 77 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) 1))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (119 enodes)
* * [misc]simplify:  iters left: 3 (340 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 (cos (/ K 2))) (fabs (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))) (* (sqrt (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1))) J))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (* -2 (cos (/ K 2))) (fabs (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))) (* (sqrt (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1))) J)) 1))
* * * * [misc]progress:  [ 29 / 77 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) 1))>
* [enter]simplify:  Simplifying (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (119 enodes)
* * [misc]simplify:  iters left: 3 (340 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 (cos (/ K 2))) (fabs (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))) (* (sqrt (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1))) J))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (* -2 (cos (/ K 2))) (fabs (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1)))) (* (sqrt (cbrt (+ (* (/ (/ U (* J 2)) (cos (/ K 2))) (/ (/ U (* J 2)) (cos (/ K 2)))) 1))) J)) 1))
* * * * [misc]progress:  [ 30 / 77 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) 1))>
* * * * [misc]progress:  [ 31 / 77 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (* -2 J)) (+ (log (cos (/ K 2))) (+ (log (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (log (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (+ (log (* -2 J)) (+ (log (cos (/ K 2))) (+ (log (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (log (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * [misc]simplify:  iters left: 6 (29 enodes)
* * [misc]simplify:  iters left: 5 (57 enodes)
* * [misc]simplify:  iters left: 4 (116 enodes)
* * [misc]simplify:  iters left: 3 (319 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (+ (+ (log (* -2 J)) (log (cos (/ K 2)))) (log (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))))))
* * * * [misc]progress:  [ 32 / 77 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (* -2 J)) (+ (log (cos (/ K 2))) (log (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (+ (log (* -2 J)) (+ (log (cos (/ K 2))) (log (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * [misc]simplify:  iters left: 6 (28 enodes)
* * [misc]simplify:  iters left: 5 (56 enodes)
* * [misc]simplify:  iters left: 4 (108 enodes)
* * [misc]simplify:  iters left: 3 (303 enodes)
* [exit]simplify:  Simplified to (+ (log (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (+ (log (* -2 J)) (log (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (+ (log (* -2 J)) (log (cos (/ K 2)))))))
* * * * [misc]progress:  [ 33 / 77 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (* -2 J)) (log (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (+ (log (* -2 J)) (log (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * [misc]simplify:  iters left: 6 (27 enodes)
* * [misc]simplify:  iters left: 5 (55 enodes)
* * [misc]simplify:  iters left: 4 (108 enodes)
* * [misc]simplify:  iters left: 3 (295 enodes)
* [exit]simplify:  Simplified to (+ (log (* (sqrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))))) (+ (log (cos (/ K 2))) (log (* -2 J))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (* (sqrt (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))) (fabs (cbrt (+ (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 1))))) (+ (log (cos (/ K 2))) (log (* -2 J))))))
* * * * [misc]progress:  [ 34 / 77 ] simplifiying candidate #<alt (λ (J K U) (exp (log (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 35 / 77 ] simplifiying candidate #<alt (λ (J K U) (log (exp (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 36 / 77 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (* (* (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))) (* (* (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * [misc]simplify:  iters left: 6 (33 enodes)
* * [misc]simplify:  iters left: 5 (75 enodes)
* * [misc]simplify:  iters left: 4 (246 enodes)
* [exit]simplify:  Simplified to (* (pow (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) 3) (* (* (* (* (pow (* -2 J) 3) (cos (/ K 2))) (* (cos (/ K 2)) (cos (/ K 2)))) (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (sqrt (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (pow (fabs (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) 3) (* (* (* (* (pow (* -2 J) 3) (cos (/ K 2))) (* (cos (/ K 2)) (cos (/ K 2)))) (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1))) (sqrt (cbrt (+ (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) 1)))))))
* * * * [misc]progress:  [ 37 / 77 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * [misc]simplify:  iters left: 6 (31 enodes)
* * [misc]simplify:  iters left: 5 (75 enodes)
* * [misc]simplify:  iters left: 4 (231 enodes)
* [exit]simplify:  Simplified to (* (* (fabs (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (* (* (* (* (pow (* -2 J) 3) (cos (/ K 2))) (* (cos (/ K 2)) (cos (/ K 2)))) (fabs (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (* (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (fabs (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (fabs (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (* (* (* (* (pow (* -2 J) 3) (cos (/ K 2))) (* (cos (/ K 2)) (cos (/ K 2)))) (fabs (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (* (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (fabs (cbrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))))))
* * * * [misc]progress:  [ 38 / 77 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* -2 J) (* -2 J)) (* -2 J)) (* (* (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * [misc]simplify:  iters left: 6 (29 enodes)
* * [misc]simplify:  iters left: 5 (69 enodes)
* * [misc]simplify:  iters left: 4 (209 enodes)
* [exit]simplify:  Simplified to (* (* (* (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (cos (/ K 2)) (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (* (* 4 J) J)) (* (* (* (* -2 J) (cos (/ K 2))) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (* (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (cos (/ K 2)) (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (* (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (cos (/ K 2)) (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (* (* 4 J) J)) (* (* (* (* -2 J) (cos (/ K 2))) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (* (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (cos (/ K 2)) (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))))))
* * * * [misc]progress:  [ 39 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* (cbrt (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))) (cbrt (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 40 / 77 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 41 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (sqrt (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 42 / 77 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* * * * [misc]progress:  [ 43 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (71 enodes)
* * [misc]simplify:  iters left: 3 (209 enodes)
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))))
* * * * [misc]progress:  [ 44 / 77 ] simplifiying candidate #<alt (λ (J K U) (* -2 (* J (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* * * * [misc]progress:  [ 45 / 77 ] simplifiying candidate #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))))) (sqrt (cbrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (35 enodes)
* * [misc]simplify:  iters left: 4 (92 enodes)
* * [misc]simplify:  iters left: 3 (306 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))))) (sqrt (cbrt (+ (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) (- 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))))
* * * * [misc]progress:  [ 46 / 77 ] simplifiying candidate #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (sqrt (cbrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (47 enodes)
* * [misc]simplify:  iters left: 3 (128 enodes)
* * [misc]simplify:  iters left: 2 (486 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (sqrt (cbrt (- 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 47 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* -2 J)))>
* * * * [misc]progress:  [ 48 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (pow (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/2)))))>
* * * * [misc]progress:  [ 49 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (pow (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1)))))>
* * * * [misc]progress:  [ 50 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (exp (log (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 51 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (log (exp (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 52 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (* (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 53 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (* (* (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 54 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt (cbrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (* (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt (cbrt (* (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (sqrt (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))
* * * * [misc]progress:  [ 55 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt (cbrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))) (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))
* * * * [misc]progress:  [ 56 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt (cbrt 1)) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt 1))
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* 1 (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))
* * * * [misc]progress:  [ 57 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt (* (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (cbrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (fabs (cbrt (cbrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))) (sqrt (cbrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))
* * * * [misc]progress:  [ 58 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (cbrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt (sqrt (cbrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))) (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))
* * * * [misc]progress:  [ 59 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt 1) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* 1 (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))
* * * * [misc]progress:  [ 60 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (/ (sqrt (cbrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (sqrt (cbrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (205 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ 1 (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3))))
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (/ (sqrt (cbrt (+ 1 (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3)))) (sqrt (cbrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))))
* * * * [misc]progress:  [ 61 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (/ (sqrt (cbrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (195 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4))))
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (/ (sqrt (cbrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4)))) (sqrt (cbrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))
* * * * [misc]progress:  [ 62 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))))>
* * * * [misc]progress:  [ 63 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (fabs (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (fabs (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))))))
* * * * [misc]progress:  [ 64 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (fabs (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (fabs (sqrt (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))))))
* * * * [misc]progress:  [ 65 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (* 1 (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* * * * [misc]progress:  [ 66 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt 1)))))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt 1)))))
* * * * [misc]progress:  [ 67 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ 1 J)))) (* 2 (log (/ 1 U)))))))))))>
* [enter]simplify:  Simplifying (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ 1 J)))) (* 2 (log (/ 1 U))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (97 enodes)
* * [misc]simplify:  iters left: 3 (226 enodes)
* [exit]simplify:  Simplified to (exp (+ (+ (+ (* 2/3 (log U)) (* (log J) -2/3)) (* 1/3 (log 1/4))) (* -2/3 (log (cos (* 1/2 K))))))
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (exp (+ (+ (+ (* 2/3 (log U)) (* (log J) -2/3)) (* 1/3 (log 1/4))) (* -2/3 (log (cos (* 1/2 K)))))))))))
* * * * [misc]progress:  [ 68 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ -1 J)))) (* 2 (log (/ -1 U)))))))))))>
* [enter]simplify:  Simplifying (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ -1 J)))) (* 2 (log (/ -1 U))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (43 enodes)
* * [misc]simplify:  iters left: 4 (89 enodes)
* * [misc]simplify:  iters left: 3 (226 enodes)
* [exit]simplify:  Simplified to (* (pow (/ 1/4 (* (cos (* 1/2 K)) (cos (* 1/2 K)))) 1/3) (pow (exp 2/3) (- (log (/ -1 J)) (log (/ -1 U)))))
* [misc]simplify:  Simplified (2 2 2 2 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (* (pow (/ 1/4 (* (cos (* 1/2 K)) (cos (* 1/2 K)))) 1/3) (pow (exp 2/3) (- (log (/ -1 J)) (log (/ -1 U))))))))))
* * * * [misc]progress:  [ 69 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs 1) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 2 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs 1) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 70 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ 1 J)))) (* 2 (log (/ 1 U))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ 1 J)))) (* 2 (log (/ 1 U))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (97 enodes)
* * [misc]simplify:  iters left: 3 (226 enodes)
* [exit]simplify:  Simplified to (exp (+ (+ (+ (* 2/3 (log U)) (* (log J) -2/3)) (* 1/3 (log 1/4))) (* -2/3 (log (cos (* 1/2 K))))))
* [misc]simplify:  Simplified (2 2 2 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (exp (+ (+ (+ (* 2/3 (log U)) (* (log J) -2/3)) (* 1/3 (log 1/4))) (* -2/3 (log (cos (* 1/2 K))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 71 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ -1 J)))) (* 2 (log (/ -1 U))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ -1 J)))) (* 2 (log (/ -1 U))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (43 enodes)
* * [misc]simplify:  iters left: 4 (89 enodes)
* * [misc]simplify:  iters left: 3 (226 enodes)
* [exit]simplify:  Simplified to (* (pow (/ 1/4 (* (cos (* 1/2 K)) (cos (* 1/2 K)))) 1/3) (pow (exp 2/3) (- (log (/ -1 J)) (log (/ -1 U)))))
* [misc]simplify:  Simplified (2 2 2 1 1) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (* (pow (/ 1/4 (* (cos (* 1/2 K)) (cos (* 1/2 K)))) 1/3) (pow (exp 2/3) (- (log (/ -1 J)) (log (/ -1 U)))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 72 / 77 ] simplifiying candidate #<alt (λ (J K U) (* -2 (* (* J (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J)))))))))>
* [enter]simplify:  Simplifying (* -2 (* (* J (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))) (sqrt (exp (* 1/3 (- (+ (log 1/4) (* 2 (log U))) (* 2 (log J))))))))
* * [misc]simplify:  iters left: 6 (33 enodes)
* * [misc]simplify:  iters left: 5 (63 enodes)
* * [misc]simplify:  iters left: 4 (149 enodes)
* * [misc]simplify:  iters left: 3 (404 enodes)
* [exit]simplify:  Simplified to (* (fabs (cbrt (+ (* (/ (* (/ U J) (/ U J)) (cos (* K 1/2))) (/ 1/4 (cos (* K 1/2)))) 1))) (* (sqrt (* (pow 1/4 1/3) (pow (exp 2/3) (- (log U) (log J))))) (* -2 J)))
* [misc]simplify:  Simplified (2) to (λ (J K U) (* (fabs (cbrt (+ (* (/ (* (/ U J) (/ U J)) (cos (* K 1/2))) (/ 1/4 (cos (* K 1/2)))) 1))) (* (sqrt (* (pow 1/4 1/3) (pow (exp 2/3) (- (log U) (log J))))) (* -2 J))))
* * * * [misc]progress:  [ 73 / 77 ] simplifiying candidate #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) (* J (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))))))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) (* J (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (101 enodes)
* * [misc]simplify:  iters left: 3 (299 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (* K 1/2))) (fabs (cbrt (+ (/ (* 1/4 (* (/ U J) (/ U J))) (* (cos (* K 1/2)) (cos (* K 1/2)))) 1))))
* [misc]simplify:  Simplified (2) to (λ (J K U) (* (* (* J -2) (cos (* K 1/2))) (fabs (cbrt (+ (/ (* 1/4 (* (/ U J) (/ U J))) (* (cos (* K 1/2)) (cos (* K 1/2)))) 1)))))
* * * * [misc]progress:  [ 74 / 77 ] simplifiying candidate #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) (* J (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)))))))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) (* J (fabs (cbrt (+ (* 1/4 (/ (pow U 2) (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1))))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (101 enodes)
* * [misc]simplify:  iters left: 3 (299 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (* K 1/2))) (fabs (cbrt (+ (/ (* 1/4 (* (/ U J) (/ U J))) (* (cos (* K 1/2)) (cos (* K 1/2)))) 1))))
* [misc]simplify:  Simplified (2) to (λ (J K U) (* (* (* J -2) (cos (* K 1/2))) (fabs (cbrt (+ (/ (* 1/4 (* (/ U J) (/ U J))) (* (cos (* K 1/2)) (cos (* K 1/2)))) 1)))))
* * * * [misc]progress:  [ 75 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) 1))))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 2 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) 1))))
* * * * [misc]progress:  [ 76 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ 1 J)))) (* 2 (log (/ 1 U)))))))))))>
* [enter]simplify:  Simplifying (sqrt (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ 1 J)))) (* 2 (log (/ 1 U)))))))
* * [misc]simplify:  iters left: 6 (24 enodes)
* * [misc]simplify:  iters left: 5 (48 enodes)
* * [misc]simplify:  iters left: 4 (98 enodes)
* * [misc]simplify:  iters left: 3 (227 enodes)
* [exit]simplify:  Simplified to (sqrt (exp (+ (+ (+ (* (log J) -2/3) (* 2/3 (log U))) (* (log 1/4) 1/3)) (* -2/3 (log (cos (* 1/2 K)))))))
* [misc]simplify:  Simplified (2 2 2 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (exp (+ (+ (+ (* (log J) -2/3) (* 2/3 (log U))) (* (log 1/4) 1/3)) (* -2/3 (log (cos (* 1/2 K)))))))))))
* * * * [misc]progress:  [ 77 / 77 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ -1 J)))) (* 2 (log (/ -1 U)))))))))))>
* [enter]simplify:  Simplifying (sqrt (exp (* 1/3 (- (+ (log (/ 1/4 (pow (cos (* 1/2 K)) 2))) (* 2 (log (/ -1 J)))) (* 2 (log (/ -1 U)))))))
* * [misc]simplify:  iters left: 6 (24 enodes)
* * [misc]simplify:  iters left: 5 (44 enodes)
* * [misc]simplify:  iters left: 4 (90 enodes)
* * [misc]simplify:  iters left: 3 (227 enodes)
* [exit]simplify:  Simplified to (sqrt (* (pow (/ 1/4 (* (cos (* 1/2 K)) (cos (* 1/2 K)))) 1/3) (pow (exp 2/3) (- (log (/ -1 J)) (log (/ -1 U))))))
* [misc]simplify:  Simplified (2 2 2 2) to (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (* (pow (/ 1/4 (* (cos (* 1/2 K)) (cos (* 1/2 K)))) 1/3) (pow (exp 2/3) (- (log (/ -1 J)) (log (/ -1 U))))))))))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 4 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2 1)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 1 2 2 1)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 1 2 1 1)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 2)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2 1)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U J)) 0) (* 0 (* 1/2 (/ U J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/8 in J
* [misc]backup-simplify:  Simplify 1/8 into 1/8
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (cos (* 1/2 K))) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/8 (pow (cos (* 1/2 K)) 2)) into (/ 1/8 (pow (cos (* 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/8 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))))) (* 2 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/8 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 0) (* 0 (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]taylor:  Taking taylor expansion of (/ (cos (/ 1/2 K)) J) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (cos (/ 1/2 K)) (/ 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ (cos (/ 1/2 K)) J))))) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (cos (/ 1/2 (/ 1 K)))) (* 1 (* (/ 1 J) (/ 1 (/ 1 U))))) into (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 0) (* 0 (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]taylor:  Taking taylor expansion of (/ (cos (/ -1/2 K)) J) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (cos (/ -1/2 K)) (/ 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ (cos (/ -1/2 K)) J))))) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* (/ 1 (- J)) (/ 1 (/ 1 (- U)))))) into (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2 1 2 2 1)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U J)) 0) (* 0 (* 1/2 (/ U J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/8 in J
* [misc]backup-simplify:  Simplify 1/8 into 1/8
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (cos (* 1/2 K))) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/8 (pow (cos (* 1/2 K)) 2)) into (/ 1/8 (pow (cos (* 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/8 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))))) (* 2 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/8 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 0) (* 0 (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]taylor:  Taking taylor expansion of (/ (cos (/ 1/2 K)) J) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (cos (/ 1/2 K)) (/ 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ (cos (/ 1/2 K)) J))))) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (cos (/ 1/2 (/ 1 K)))) (* 1 (* (/ 1 J) (/ 1 (/ 1 U))))) into (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 0) (* 0 (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]taylor:  Taking taylor expansion of (/ (cos (/ -1/2 K)) J) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (cos (/ -1/2 K)) (/ 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ (cos (/ -1/2 K)) J))))) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* (/ 1 (- J)) (/ 1 (/ 1 (- U)))))) into (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 1 2 1 1)
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U J)) 0) (* 0 (* 1/2 (/ U J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/8 in J
* [misc]backup-simplify:  Simplify 1/8 into 1/8
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (cos (* 1/2 K))) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/8 (pow (cos (* 1/2 K)) 2)) into (/ 1/8 (pow (cos (* 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/8 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (* (cos (* 1/2 K)) J))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (* 2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) 0) (* 0 (/ 1/2 (* (cos (* 1/2 K)) J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))))) (* 2 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/8 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 0) (* 0 (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]taylor:  Taking taylor expansion of (/ (cos (/ 1/2 K)) J) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (cos (/ 1/2 K)) (/ 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ (cos (/ 1/2 K)) J))))) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (cos (/ 1/2 (/ 1 K)))) (* 1 (* (/ 1 J) (/ 1 (/ 1 U))))) into (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* [misc]approximate:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 0) (* 0 (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]taylor:  Taking taylor expansion of (/ (cos (/ -1/2 K)) J) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (cos (/ -1/2 K)) (/ 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ (cos (/ -1/2 K)) J))))) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* (/ 1 (- J)) (/ 1 (/ 1 (- U)))))) into (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 2)
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 J) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (* 2 J) 1) into (* 2 J)
* [misc]backup-simplify:  Simplify (/ U (* 2 J)) into (* 1/2 (/ U J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U J)) (* 1/2 (/ U J))) into (* 1/4 (/ (pow U 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) into (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) into (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 J) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 J)) (+ (* (* 1/2 (/ U J)) (/ 0 (* 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U J)) 0) (* 0 (* 1/2 (/ U J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 J) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 0) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 1) (* 0 0)) into 2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 2 (cos (* 1/2 K)))) into (* 2 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (/ U (* 2 (cos (* 1/2 K)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ U (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K))))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (cos (* 1/2 K)))) (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) (/ 0 (* 2 (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ U (cos (* 1/2 K))))) into (log (* 1/2 (/ U (cos (* 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log J)) (log (* 1/2 (/ U (cos (* 1/2 K)))))) into (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))) into (* 1/3 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J)))) into (exp (* 1/3 (- (log (* 1/2 (/ U (cos (* 1/2 K))))) (log J))))
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)) (pow 1 1)))) 2) into (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 0))) into (* 1/24 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ U (* (* 2 J) (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 J) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 J) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 J) into (* 2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (* 2 J) (cos (* 1/2 K))) into (* 2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (* (cos (* 1/2 K)) J))) into (/ 1/2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 1/2 (* (cos (* 1/2 K)) J))) into (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) into (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1)) (pow 1 1)))) 2) into (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 0))) into (* 1/24 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 1/24 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) 1) 1)))) into (/ 1/24 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/24 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/24 in J
* [misc]backup-simplify:  Simplify 1/24 into 1/24
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (* 1/2 K) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (cos (* 1/2 K))) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/24 (pow (cos (* 1/2 K)) 2)) into (/ 1/24 (pow (cos (* 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 K)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 K))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/24 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (* 1/2 K)) 2)) (+ (* (/ 1/24 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (* U (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (* 1/2 (/ J (* U (cos (/ 1/2 K)))))) into (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))) into (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) 0) (* 0 (* 1/2 (/ J (* U (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))) into (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)))) into (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into (pow (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (/ 1 U) into (/ 1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ 1/2 K))) into (* 2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ 1 U) (* 2 (cos (/ 1/2 K)))) into (/ 1/2 (* U (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* U (cos (/ 1/2 K)))) (/ 1/2 (* U (cos (/ 1/2 K))))) into (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1)) (pow 1 1)))) 2) into (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/8 (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) (+ (* 0 0) (* 0 0))) into (* 1/24 (/ 1 (* (pow U 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 J)) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ 1 J) into (/ 1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ 1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (/ 2 J) (cos (/ 1/2 K))) into (* 2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ 1 (* 2 (/ (cos (/ 1/2 K)) J))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* 1/2 (/ J (cos (/ 1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ 1/2 K))))) into (log (* 1/2 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) into (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ 1/2 K))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ 1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 2 J) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* 2 (/ (cos (/ 1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))) (* 0 (/ 0 (* 2 (/ (cos (/ 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 (/ (cos (/ 1/2 K)) J)) 1)) (pow (* 1/2 (/ J (cos (/ 1/2 K)))) 1)))) 2) into (* 2 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ 1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (* 2 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))))) into (* 2/3 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 2/3 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))) 1) 1)))) into (* 2/3 (/ (* (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (pow (cos (/ 1/2 K)) 2)) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (* 2/3 (/ (* (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (pow (cos (/ 1/2 K)) 2)) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 2/3 in J
* [misc]backup-simplify:  Simplify 2/3 into 2/3
* [misc]taylor:  Taking taylor expansion of (/ (* (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (pow (cos (/ 1/2 K)) 2)) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (* (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) (pow (cos (/ 1/2 K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ 1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ 1/2 K))) into (/ 1 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ 1/2 K)))) into (/ 1/2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ 1/2 K)))) into (log (/ 1/2 (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ 1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))) into (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (cos (/ 1/2 K))) into (pow (cos (/ 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (pow (cos (/ 1/2 K)) 2)) into (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (/ (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (pow (cos (/ 1/2 K)) 2)) 1) into (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 0) (+ (* 0 0) (* 0 (pow (cos (/ 1/2 K)) 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) 0) (* 0 (pow (cos (/ 1/2 K)) 2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (pow (cos (/ 1/2 K)) 2)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (pow (cos (/ 1/2 K)) 2)) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2/3 0) (+ (* 0 0) (* 0 (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (pow (cos (/ 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ 1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ 1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ 1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (/ 1/2 (/ 1 K)))))) (log (/ 1 U))))) into (exp (* 1/3 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))
* [misc]approximate:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in K
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in K
* [misc]taylor:  Taking taylor expansion of 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in K
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in K
* [misc]taylor:  Taking taylor expansion of (- J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (* 1/2 (/ J (* (cos (/ -1/2 K)) U)))) into (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))) into (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) into (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) 0) (* 0 (* 1/2 (/ J (* (cos (/ -1/2 K)) U))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) into (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))
* [misc]backup-simplify:  Simplify (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))))) into (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) into (pow (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))))) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in J
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in J
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in J
* [misc]taylor:  Taking taylor expansion of (- U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (/ 1 (- U)) into (/ -1 U)
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in J
* [misc]taylor:  Taking taylor expansion of (- J) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 -1) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ -1/2 K))) into (* -2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (/ -1 U) (* -2 (cos (/ -1/2 K)))) into (/ 1/2 (* (cos (/ -1/2 K)) U))
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow 1 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) (pow 1 1)))) 2) into (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 0))) into (* 1/24 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (cbrt (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Rewrote expression to (pow (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))))) in U
* [misc]taylor:  Taking taylor expansion of 1/3 in U
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (log (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2))) in U
* [misc]taylor:  Taking taylor expansion of (+ 1 (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2)) in U
* [misc]taylor:  Taking taylor expansion of 1 in U
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (pow (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- U)) in U
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of (* (* 2 (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (/ 1 (- J)) in U
* [misc]taylor:  Taking taylor expansion of (- J) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (/ 1 (- J)) into (/ -1 J)
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (/ -1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (/ -2 J) (cos (/ -1/2 K))) into (* -2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (/ -1 (* -2 (/ (cos (/ -1/2 K)) J))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 1/2 (/ J (cos (/ -1/2 K))))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ 0 (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) into (* 1/2 (/ J (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (/ -1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (log (* 1/2 (/ J (cos (/ -1/2 K))))) into (log (* 1/2 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) into (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))) into (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) into (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))) in K
* [misc]taylor:  Taking taylor expansion of 1/3 in K
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)) in K
* [misc]taylor:  Taking taylor expansion of (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (log J) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (log J) into (log J)
* [misc]taylor:  Taking taylor expansion of (log (/ 1/2 (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (cos (/ -1/2 K))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))) into (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) into (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) into (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))))
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow J 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- J) into (- J)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 J) (/ 0 (- J))) (* 0 (/ 0 (- J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (/ -1 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ -2 J) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (* -2 (/ (cos (/ -1/2 K)) J))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))) (* 0 (/ 0 (* -2 (/ (cos (/ -1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ J (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 2))) (* 1 (/ (* 1 (pow (* 2 (/ (cos (/ -1/2 K)) J)) 1)) (pow (* 1/2 (/ J (cos (/ -1/2 K)))) 1)))) 2) into (* 2 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* (- 1) (log U)) (log (* 1/2 (/ J (cos (/ -1/2 K)))))) into (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (+ (* 1/3 (* 2 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* 0 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) into (* 2/3 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow (* 2/3 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) 1) 1)))) into (* 2/3 (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (* 2/3 (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 2/3 in J
* [misc]backup-simplify:  Simplify 2/3 into 2/3
* [misc]taylor:  Taking taylor expansion of (/ (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))))) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U))) in J
* [misc]taylor:  Taking taylor expansion of 1/3 in J
* [misc]backup-simplify:  Simplify 1/3 into 1/3
* [misc]taylor:  Taking taylor expansion of (- (log (* 1/2 (/ J (cos (/ -1/2 K))))) (log U)) in J
* [misc]taylor:  Taking taylor expansion of (log (* 1/2 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/2 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 1/2 in J
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of (/ J (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in J
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in J
* [misc]taylor:  Taking taylor expansion of -1/2 in J
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ 1 (cos (/ -1/2 K))) into (/ 1 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/2 (/ 1 (cos (/ -1/2 K)))) into (/ 1/2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (log (/ 1/2 (cos (/ -1/2 K)))) into (log (/ 1/2 (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (log U) in J
* [misc]taylor:  Taking taylor expansion of U in J
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (+ (* (- -1) (log J)) (log (/ 1/2 (cos (/ -1/2 K))))) into (+ (log J) (log (/ 1/2 (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (- (log U)) into (- (log U))
* [misc]backup-simplify:  Simplify (+ (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (- (log U))) into (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))
* [misc]backup-simplify:  Simplify (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))) into (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) into (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))))
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (cos (/ -1/2 K))) into (pow (cos (/ -1/2 K)) 2)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ -1/2 K)) 2) (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))))) into (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (/ (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) (pow (cos (/ -1/2 K)) 2)) 1) into (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (* 0 (/ 1 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 2) 0) (+ (* 0 0) (* 0 (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 2) 0) (* 0 (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) (pow (cos (/ -1/2 K)) 2)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) (pow (cos (/ -1/2 K)) 2)) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2/3 0) (+ (* 0 0) (* 0 (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) (pow (cos (/ -1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (/ 1/2 (cos (/ -1/2 K))) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (/ 1/2 (cos (/ -1/2 K))) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (- (+ (log J) (log (/ 1/2 (cos (/ -1/2 K))))) (log U)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (exp (* 1/3 (- (+ (log (/ 1 (- J))) (log (/ 1/2 (cos (/ -1/2 (/ 1 (- K))))))) (log (/ 1 (- U)))))) into (exp (* 1/3 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2))))>
* * * * [misc]progress:  [ 2 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1))))>
* * * * [misc]progress:  [ 3 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 4 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 5 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 6 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 7 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 8 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 9 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]progress:  [ 10 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (204 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3))))
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (/ (sqrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))
* * * * [misc]progress:  [ 11 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (189 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4)))
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (/ (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]progress:  [ 12 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 13 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (102 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (fabs (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))))
* * * * [misc]progress:  [ 14 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 15 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 16 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 17 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 18 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 19 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 20 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 21 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 1 2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 22 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 1 2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 23 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 1 2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 24 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (204 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3))))
* [misc]simplify:  Simplified (2 1 2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (/ (sqrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 25 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (189 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4)))
* [misc]simplify:  Simplified (2 1 2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (/ (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 26 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 27 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (102 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1 2 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (fabs (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 28 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 29 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (pow (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) 1/2)) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 30 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1)) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 31 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (exp (log (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 32 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (log (exp (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 33 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 34 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (cbrt (* (* (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 35 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 1 2 1 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 36 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (103 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 1 2 1 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (sqrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 37 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (sqrt 1) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 1 2 1 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 38 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (/ (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (59 enodes)
* * [misc]simplify:  iters left: 3 (204 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3))))
* [misc]simplify:  Simplified (2 1 2 1 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (/ (sqrt (+ 1 (* (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3) (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 3)))) (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 39 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (/ (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (189 enodes)
* [exit]simplify:  Simplified to (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4)))
* [misc]simplify:  Simplified (2 1 2 1 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (/ (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 40 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 41 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (fabs (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (102 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1 2 1 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (fabs (sqrt (+ 1 (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 42 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* 1 (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* * * * [misc]progress:  [ 43 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (pow (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) 1/3)))>
* * * * [misc]progress:  [ 44 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (pow (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1)))>
* * * * [misc]progress:  [ 45 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (exp (log (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 46 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (log (exp (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 47 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (44 enodes)
* * [misc]simplify:  iters left: 3 (104 enodes)
* * [misc]simplify:  iters left: 2 (328 enodes)
* [exit]simplify:  Simplified to (cbrt (* (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (* (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (sqrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 48 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (* (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))) (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (45 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (cbrt (fabs (cbrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (fabs (cbrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))) (cbrt (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 49 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 50 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt 1)) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt 1))
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* 1 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]progress:  [ 51 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (43 enodes)
* * [misc]simplify:  iters left: 3 (105 enodes)
* * [misc]simplify:  iters left: 2 (330 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (* (/ (/ (/ U J) 2) (cos (/ K 2))) (/ (/ (/ U J) 2) (cos (/ K 2)))))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))
* * * * [misc]progress:  [ 52 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt 1) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* 1 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]progress:  [ 53 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (/ (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (+ (pow 1 3) (pow (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) 3))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (205 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (+ 1 (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (/ (cbrt (sqrt (+ 1 (pow (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2)))) 3)))) (cbrt (sqrt (+ (* 1 1) (- (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)) (* 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))))
* * * * [misc]progress:  [ 54 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (/ (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (195 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (/ (cbrt (sqrt (- 1 (pow (/ (/ U (* 2 J)) (cos (/ K 2))) 4)))) (cbrt (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))
* * * * [misc]progress:  [ 55 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (* (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 56 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 57 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (sqrt (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))>
* * * * [misc]progress:  [ 58 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* 1 (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>
* * * * [misc]progress:  [ 59 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt 1)))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt 1)))
* * * * [misc]progress:  [ 60 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))>
* [enter]simplify:  Simplifying (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (68 enodes)
* * [misc]simplify:  iters left: 1 (81 enodes)
* [exit]simplify:  Simplified to (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (/ (/ (* 1/2 U) J) (cos (* 1/2 K))))))
* * * * [misc]progress:  [ 61 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))>
* [enter]simplify:  Simplifying (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (68 enodes)
* * [misc]simplify:  iters left: 1 (81 enodes)
* [exit]simplify:  Simplified to (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (/ (/ (* 1/2 U) J) (cos (* 1/2 K))))))
* * * * [misc]progress:  [ 62 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt 1))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 1 2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt 1))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 63 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (68 enodes)
* * [misc]simplify:  iters left: 1 (81 enodes)
* [exit]simplify:  Simplified to (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 1 2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 64 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (68 enodes)
* * [misc]simplify:  iters left: 1 (81 enodes)
* [exit]simplify:  Simplified to (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 1 2 2 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 65 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt 1) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 1 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt 1) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 66 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* 1/2 (/ U (* (cos (* 1/2 K)) J)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (68 enodes)
* * [misc]simplify:  iters left: 1 (81 enodes)
* [exit]simplify:  Simplified to (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 1 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 67 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* 1/2 (/ U (* (cos (* 1/2 K)) J)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))>
* [enter]simplify:  Simplifying (* 1/2 (/ U (* (cos (* 1/2 K)) J)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (68 enodes)
* * [misc]simplify:  iters left: 1 (81 enodes)
* [exit]simplify:  Simplified to (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 1 2 1 1) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))
* * * * [misc]progress:  [ 68 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) 1))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) 1))
* * * * [misc]progress:  [ 69 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (exp (* 1/3 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))))>
* [enter]simplify:  Simplifying (exp (* 1/3 (- (+ (log (/ 1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ 1 U)))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (68 enodes)
* * [misc]simplify:  iters left: 3 (172 enodes)
* [exit]simplify:  Simplified to (pow (exp 1/3) (- (+ (- (log U) (log J)) (log 1/2)) (log (cos (* 1/2 K)))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (pow (exp 1/3) (- (+ (- (log U) (log J)) (log 1/2)) (log (cos (* 1/2 K)))))))
* * * * [misc]progress:  [ 70 / 70 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (exp (* 1/3 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))))>
* [enter]simplify:  Simplifying (exp (* 1/3 (- (+ (log (/ -1 J)) (log (/ 1/2 (cos (* 1/2 K))))) (log (/ -1 U)))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (35 enodes)
* * [misc]simplify:  iters left: 4 (77 enodes)
* * [misc]simplify:  iters left: 3 (247 enodes)
* [exit]simplify:  Simplified to (pow (exp 1/3) (- (log (/ 1/2 (cos (* 1/2 K)))) (- (log (/ -1 U)) (log (/ -1 J)))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (pow (exp 1/3) (- (log (/ 1/2 (cos (* 1/2 K)))) (- (log (/ -1 U)) (log (/ -1 J)))))))
* * * [misc]progress:  adding candidates to table
* [misc]progress:  [Phase 3 of 3] Extracting.
* * [misc]regime:  Finding splitpoints for: (#<alt (λ (J K U) (* (* (* (* -2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (sqrt (* (* -2 J) (cos (/ K 2)))) (sqrt (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))> #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>)
* * * [misc]regime-changes:  Trying 6 branch expressions: (U K (/ K 2) (cos (/ K 2)) J (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))
* * * * [misc]regimes:  Trying to branch on U from (#<alt (λ (J K U) (* (* (* (* -2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (sqrt (* (* -2 J) (cos (/ K 2)))) (sqrt (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))> #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>)
* * * * [misc]regimes:  Trying to branch on K from (#<alt (λ (J K U) (* (* (* (* -2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (sqrt (* (* -2 J) (cos (/ K 2)))) (sqrt (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))> #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>)
* * * * [misc]regimes:  Trying to branch on (/ K 2) from (#<alt (λ (J K U) (* (* (* (* -2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (sqrt (* (* -2 J) (cos (/ K 2)))) (sqrt (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))> #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>)
* * * * [misc]regimes:  Trying to branch on (cos (/ K 2)) from (#<alt (λ (J K U) (* (* (* (* -2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (sqrt (* (* -2 J) (cos (/ K 2)))) (sqrt (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))> #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>)
* * * * [misc]regimes:  Trying to branch on J from (#<alt (λ (J K U) (* (* (* (* -2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (sqrt (* (* -2 J) (cos (/ K 2)))) (sqrt (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))> #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>)
* * * * [misc]regimes:  Trying to branch on (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) from (#<alt (λ (J K U) (* (* (* (* -2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (sqrt (* (* -2 J) (cos (/ K 2)))) (sqrt (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))> #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>)
* * * * [misc]regimes:  Trying to branch on (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) from (#<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))>)
* * * [misc]regime:  Found split indices: #<option (#s(si 3 29) #s(si 5 228) #s(si 3 256))>
* [misc]binary-search:  Only using regimes for bounds on (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) and (#<alt (λ (J K U) (* (* (* (* -2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (sqrt (* (* -2 J) (cos (/ K 2)))) (sqrt (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))> #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>)
* [misc]regimes:  Found splitpoints: (#s(sp 3 (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) -inf.0) #s(sp 5 (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1.4807643860044835e+304) #s(sp 3 (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) +nan.0)) , with alts (#<alt (λ (J K U) (* (* (* (* -2 J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (sqrt (* (* -2 J) (cos (/ K 2)))) (sqrt (* (* -2 J) (cos (/ K 2))))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))))> #<alt (λ (J K U) (* (* -2 J) (* (cos (/ K 2)) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (* (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (sqrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))))> #<alt (λ (J K U) (* (* (* (* -2 J) (cos (/ K 2))) (* (cbrt (* (fabs (cbrt (+ 1 (* (/ (/ U (* 2 J)) (cos (/ K 2))) (/ (/ U (* 2 J)) (cos (/ K 2))))))) (sqrt (cbrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))))> #<alt (λ (J K U) (* (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))))> #<alt (λ (J K U) (/ (* (* -2 J) (* (cos (/ K 2)) (sqrt (- (* 1 1) (* (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2) (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))) (sqrt (- 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>)
* [enter]simplify:  Simplifying (if (<= (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) -inf.0) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J)))) (if (<= (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) 1.4807643860044835e+304) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))) (* (* (* -2 J) (cos (/ K 2))) (* 1/2 (/ U (* (cos (* 1/2 K)) J))))))
* * [misc]simplify:  iters left: 6 (30 enodes)
* * [misc]simplify:  iters left: 5 (45 enodes)
* [exit]simplify:  Simplified to (if (<= (* (sqrt (+ (pow (/ U (* (* J 2) (cos (/ K 2)))) 2) 1)) (* (cos (/ K 2)) (* -2 J))) -inf.0) (* (* 1/2 (/ U (* (cos (* K 1/2)) J))) (* (cos (/ K 2)) (* -2 J))) (if (<= (* (sqrt (+ (pow (/ U (* (* J 2) (cos (/ K 2)))) 2) 1)) (* (cos (/ K 2)) (* -2 J))) 1.4807643860044835e+304) (* (sqrt (+ (pow (/ U (* (* J 2) (cos (/ K 2)))) 2) 1)) (* (cos (/ K 2)) (* -2 J))) (* (* 1/2 (/ U (* (cos (* K 1/2)) J))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]points:  Sampling 8000 additional inputs, on iter 0 have 0 / 8000
* * * * [misc]points:  Computing exacts on every 500 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 250 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 125 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 62 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 31 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 15 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 7 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Computing exacts on every 3 of 8000 points to ramp up precision
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Setting MPFR precision to 576
* * * * [misc]points:  Computing exacts for 8000 points
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Setting MPFR precision to 576
* * * * [misc]points:  Filtering points with unrepresentable outputs
* * * * [misc]points:  Sampling 4 additional inputs, on iter 1 have 7997 / 8000
* * * * [misc]points:  Computing exacts for 4 points
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Setting MPFR precision to 576
* * * * [misc]points:  Filtering points with unrepresentable outputs
* * * * [exit]points:  Sampled 8001 points with exact outputs