* [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 (72 enodes)
* * [misc]simplify:  iters left: 3 (156 enodes)
* * [misc]simplify:  iters left: 2 (392 enodes)
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J)))
* * [misc]progress:  iteration 1 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 2)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 1 2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 1)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) 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 (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (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 (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (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) into (* -2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (* -2 J)) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (* 1 (* -2 (* (cos (* 1/2 K)) J))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (* 1/2 K)) 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 (* (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 (+ (* -2 0) (* 0 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 (* -2 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (* -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 (* (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)) 0) into 0
* [misc]backup-simplify:  Simplify (* -2 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 (+ (* -2 0) (+ (* 0 0) (* 0 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 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)) 0) (+ (* 0 0) (* 0 (* -2 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) 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 0) (+ (* 0 0) (* (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (* -2 (* (cos (* 1/2 K)) J))))) into (- (* 1/4 (/ 1 (* (cos (* 1/2 K)) J))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (* 1/2 K)) J))) 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 (/ 1 (* (cos (* 1/2 K)) J)) in 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)) 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 (+ (* 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)) 1) (* 0 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/4 (/ 1 (cos (* 1/2 K)))) into (/ 1/4 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (- (/ 1/4 (cos (* 1/2 K)))) into (- (* 1/4 (/ 1 (cos (* 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (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 (cos (* 1/2 K))) 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 -1/4 into -1/4
* [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 (+ (* 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)) 1) (* 0 0)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (+ (* -2 (cos (* 1/2 K))) (* 0 0)) 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 (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 J)))) 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 (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* -2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) 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]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 0) (* 0 (* -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 (/ (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 1) (* 0 0))) 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]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 (+ (* 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 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 (cos (* 1/2 K))) (* 0 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)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 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 (+ (* -2 (* 1 (* J 1))) (* -1/4 (* 1 (* (/ 1 J) (pow U 2))))) into (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J))))
* [misc]approximate:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 1) into 1
* [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 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) 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 (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (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 (/ 1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (/ -2 J)) into (* -2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* -2 (/ (cos (/ 1/2 K)) J))) into -1
* [misc]taylor:  Taking taylor expansion of -1 in J
* [misc]backup-simplify:  Simplify -1 into -1
* [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) 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 (/ -2 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* -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 -1 in K
* [misc]backup-simplify:  Simplify -1 into -1
* [misc]backup-simplify:  Simplify -1 into -1
* [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 (+ (* -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)) 0) (+ (* 0 0) (* 0 (/ -2 J)))) into 0
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* (/ (cos (/ 1/2 K)) J) (* -2 (/ (cos (/ 1/2 K)) J))))) into (- (* 2 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [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 (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) 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 (cos (/ 1/2 K))) 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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (/ (pow (cos (/ 1/2 K)) 2) 1) into (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ 1/2 K)) 2) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (pow (cos (/ 1/2 K)) 2))) 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]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 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 (+ 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 0) (+ (* 0 0) (* 0 (/ -2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) 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 (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) 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 (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 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 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]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (+ (* (/ (cos (/ 1/2 K)) J) 0) (* 0 (* -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 (/ (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 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 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 (+ (* 2 0) (+ (* 0 0) (* 0 (pow (cos (/ 1/2 K)) 2)))) 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 (* 1 (* 1 (/ 1 (/ 1 U))))) into (* -1 U)
* [misc]approximate:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (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 (/ -1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (/ 2 J)) into (* 2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (/ (cos (/ -1/2 K)) J))) into 1
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [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) 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 (/ 2 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 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 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [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 (+ (* -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)) 0) (+ (* 0 0) (* 0 (/ 2 J)))) into 0
* [misc]backup-simplify:  Simplify (* 1 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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* (/ (cos (/ -1/2 K)) J) (* 2 (/ (cos (/ -1/2 K)) J))))) into (* 2 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [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 (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) 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 (cos (/ -1/2 K))) 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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (/ (pow (cos (/ -1/2 K)) 2) 1) into (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ -1/2 K)) 2) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 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 (+ 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 0) (+ (* 0 0) (* 0 (/ 2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 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 (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) 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 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 (- 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) 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 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 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]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (+ (* (/ (cos (/ -1/2 K)) J) 0) (* 0 (* 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 (/ (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 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 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 (+ (* 2 0) (+ (* 0 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 (* 1 (* 1 (/ 1 (/ 1 (- U)))))) into (* -1 U)
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2 2)
* [misc]approximate:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) in (K J) around 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) 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 (* -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)) (* -2 J)) 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 (* -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)) (* -2 J)) 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 (* -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 (* 1 (* -2 J)) into (* -2 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]backup-simplify:  Simplify (* -2 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 J)) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (* -2 J))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 1) (* 0 0)) into -2
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* (- 1/8) (* -2 J)))) into (* 1/4 J)
* [misc]taylor:  Taking taylor expansion of (* 1/4 J) 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 J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/4 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) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) 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 0) (+ (* (- 1/8) 0) (* 0 (* -2 J))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 1) (* 0 0)) into 1/4
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 1/2 4) 24)) 0 (* -1 (/ (pow 1/2 1) 1) (/ (pow 0 1) 1)) (* -1 (/ (pow 0 2) 2)) 0) into 1/384
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* (- 1/8) 0) (+ (* 0 0) (* 1/384 (* -2 J)))))) into (- (* 1/192 J))
* [misc]taylor:  Taking taylor expansion of (- (* 1/192 J)) in J
* [misc]taylor:  Taking taylor expansion of (* 1/192 J) in J
* [misc]taylor:  Taking taylor expansion of 1/192 in J
* [misc]backup-simplify:  Simplify 1/192 into 1/192
* [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/192 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/4 0) (+ (* 0 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 (* J (pow K 2))) (* -2 (* J 1))) into (- (* 1/4 (* (pow K 2) J)) (* 2 J))
* [misc]approximate:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) in (K J) around 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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)) (* -2 (/ 1 J))) 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 (* -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)) (* -2 (/ 1 J))) 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 (* -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 (* (cos (/ 1/2 K)) (/ -2 J)) into (* -2 (/ (cos (/ 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (* -2 (/ (cos (/ 1/2 K)) 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 (/ (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 (* -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 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (/ 1 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (/ -2 J))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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 1) (+ (* (cos (/ 1/2 K)) (/ 0 1)))) 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 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 (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (/ -2 J)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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 1) (+ (* (cos (/ 1/2 K)) (/ 0 1)) (* 0 (/ 0 1)))) 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 (- (+ (* (/ 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 (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ -2 J))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)) (* 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 (- (/ 0 1) (+ (* (cos (/ 1/2 K)) (/ 0 1)) (* 0 (/ 0 1)) (* 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 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 (/ 1 K)))) (* (/ 1 (/ 1 J)) 1)) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) in (K J) around 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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)) (* -2 (/ 1 (- J)))) 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 (* -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)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (cos (/ -1/2 K)) (/ 2 J)) into (* 2 (/ (cos (/ -1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (* 2 (/ (cos (/ -1/2 K)) 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 (/ (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 (* 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 (- 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 (+ (* (cos (/ -1/2 K)) 0) (* 0 (/ 2 J))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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 1) (+ (* (cos (/ -1/2 K)) (/ 0 1)))) 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 (- 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 (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (/ 2 J)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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 1) (+ (* (cos (/ -1/2 K)) (/ 0 1)) (* 0 (/ 0 1)))) 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) 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 (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ 2 J))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)) (* 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 (- (/ 0 1) (+ (* (cos (/ -1/2 K)) (/ 0 1)) (* 0 (/ 0 1)) (* 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 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 (/ 1 (- K))))) (* (/ 1 (/ 1 (- J))) 1)) into (* -2 (* (cos (* 1/2 K)) J))
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 1 2)
* [misc]approximate:  Taking taylor expansion of (/ (/ (/ U 2) J) (cos (/ K 2))) in (U J K) around 0
* [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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 J
* [misc]taylor:  Taking taylor expansion of (/ (/ U 2) J) in J
* [misc]taylor:  Taking taylor expansion of (/ U 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 U
* [misc]taylor:  Taking taylor expansion of (/ (/ U 2) J) in U
* [misc]taylor:  Taking taylor expansion of (/ 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 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 (/ 1/2 (* (cos (* 1/2 K)) J)) 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 (* (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)) 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 (+ (* 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)) 1) (* 0 0)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (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 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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/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 1) (* 0 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]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 1) (+ (* 1/2 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 J)) (* 0 (/ 0 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 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 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (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 (+ 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 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (cos (* 1/2 K))) (/ 0 (cos (* 1/2 K)))) (* 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 (+ (* -1 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/2 (/ (- 1/8) 1)) (* 0 (/ 0 1)))) into 1/16
* [misc]backup-simplify:  Simplify 1/16 into 1/16
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (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 (/ (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 (+ (* 1/2 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 K))))) 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 (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 1) (* 0 0))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (cos (* 1/2 K))) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))) (* 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 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1/16 (* (pow K 2) (* (/ 1 J) U))) (* 1/2 (* 1 (* (/ 1 J) U)))) into (+ (* 1/16 (/ (* (pow K 2) U) J)) (* 1/2 (/ U J)))
* [misc]approximate:  Taking taylor expansion of (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) in (U J K) around 0
* [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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) 2) (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) 2) (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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/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]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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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]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]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 (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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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]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 (/ (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]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 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in (U J K) around 0
* [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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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/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]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 (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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]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]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 (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 (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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]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 (/ (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]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 1)
* [misc]approximate:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) 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 (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (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 (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [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 0) (+ (* 0 0) (* 0 1))) 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]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 (exp (* 2 (log (cos (* 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (* 1/2 K)))) 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 (cos (* 1/2 K))) 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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (* 1/2 K)))) into (* 2 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [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 (+ 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (* 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 1) 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/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 (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) 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 (/ (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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (* 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (* 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) 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 (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 1) into 1
* [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 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) 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 (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 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 1) into 1
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 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) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) 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 (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) 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 (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 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 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 (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 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 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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 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) (* 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 (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) 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 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 (- 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) 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 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 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:  simplifying candidates
* * * * [misc]progress:  [ 1 / 93 ] simplifiying candidate #<alt (λ (J K U) (log1p (expm1 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 2 / 93 ] simplifiying candidate #<alt (λ (J K U) (expm1 (log1p (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 3 / 93 ] simplifiying candidate #<alt (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))) 1))>
* [enter]simplify:  Simplifying (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J)))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (28 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (78 enodes)
* * [misc]simplify:  iters left: 2 (103 enodes)
* * [misc]simplify:  iters left: 1 (104 enodes)
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 4 / 93 ] simplifiying candidate #<alt (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))) 1))>
* [enter]simplify:  Simplifying (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J)))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (28 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (78 enodes)
* * [misc]simplify:  iters left: 2 (103 enodes)
* * [misc]simplify:  iters left: 1 (104 enodes)
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 5 / 93 ] simplifiying candidate #<alt (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))) 1))>
* * * * [misc]progress:  [ 6 / 93 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (+ (log (cos (/ K 2))) (log (* -2 J))))))>
* [enter]simplify:  Simplifying (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (+ (log (cos (/ K 2))) (log (* -2 J))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (51 enodes)
* * [misc]simplify:  iters left: 3 (79 enodes)
* * [misc]simplify:  iters left: 2 (112 enodes)
* * [misc]simplify:  iters left: 1 (117 enodes)
* [exit]simplify:  Simplified to (+ (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (+ (log (* J -2)) (log (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (+ (log (* J -2)) (log (cos (/ K 2)))))))
* * * * [misc]progress:  [ 7 / 93 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (log (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (log (* (cos (/ K 2)) (* -2 J))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (50 enodes)
* * [misc]simplify:  iters left: 3 (84 enodes)
* * [misc]simplify:  iters left: 2 (121 enodes)
* * [misc]simplify:  iters left: 1 (128 enodes)
* [exit]simplify:  Simplified to (+ (log (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (log (* (* J -2) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (log (* (* J -2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 8 / 93 ] simplifiying candidate #<alt (λ (J K U) (exp (log (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 9 / 93 ] simplifiying candidate #<alt (λ (J K U) (log (exp (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 10 / 93 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* -2 J) (* -2 J)) (* -2 J))))))>
* [enter]simplify:  Simplifying (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* -2 J) (* -2 J)) (* -2 J))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (149 enodes)
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (* (pow (* J -2) 3) (cos (/ K 2))) (* (cos (/ K 2)) (cos (/ K 2))))) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (* (pow (* J -2) 3) (cos (/ K 2))) (* (cos (/ K 2)) (cos (/ K 2))))) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 11 / 93 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* (cos (/ K 2)) (* -2 J)) (* (cos (/ K 2)) (* -2 J))) (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* (cos (/ K 2)) (* -2 J)) (* (cos (/ K 2)) (* -2 J))) (* (cos (/ K 2)) (* -2 J))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (126 enodes)
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 12 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))) (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 13 / 93 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J)))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 14 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J)))) (sqrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 15 / 93 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 16 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))>
* [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) to (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 17 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (32 enodes)
* * [misc]simplify:  iters left: 2 (44 enodes)
* * [misc]simplify:  iters left: 1 (45 enodes)
* [exit]simplify:  Simplified to (* (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 18 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (24 enodes)
* * [misc]simplify:  iters left: 3 (31 enodes)
* * [misc]simplify:  iters left: 2 (43 enodes)
* * [misc]simplify:  iters left: 1 (44 enodes)
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 19 / 93 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 20 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (cos (/ K 2)) (* -2 J)) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* * * * [misc]progress:  [ 21 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (log1p (expm1 (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 22 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (expm1 (log1p (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 23 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (cos (/ K 2)) (* -2 J)) 1)))>
* [enter]simplify:  Simplifying (* (cos (/ K 2)) (* -2 J))
* * [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 2 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (cos (/ K 2)) (* -2 J)) 1)))
* * * * [misc]progress:  [ 24 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (cos (/ K 2)) (* -2 J)) 1)))>
* * * * [misc]progress:  [ 25 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (exp (+ (log (cos (/ K 2))) (log (* -2 J))))))>
* [enter]simplify:  Simplifying (+ (log (cos (/ K 2))) (log (* -2 J)))
* * [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 2 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (exp (+ (log (* -2 J)) (log (cos (/ K 2)))))))
* * * * [misc]progress:  [ 26 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (exp (log (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 27 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (log (exp (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 28 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cbrt (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* -2 J) (* -2 J)) (* -2 J))))))>
* [enter]simplify:  Simplifying (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* -2 J) (* -2 J)) (* -2 J)))
* * [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))) (* (pow (* J -2) 3) (cos (/ K 2))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cbrt (* (* (cos (/ K 2)) (cos (/ K 2))) (* (pow (* J -2) 3) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 29 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (* (cos (/ K 2)) (* -2 J))) (cbrt (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 30 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cbrt (* (* (* (cos (/ K 2)) (* -2 J)) (* (cos (/ K 2)) (* -2 J))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 31 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (* (cos (/ K 2)) (* -2 J))) (sqrt (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 32 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* 1 (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 33 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cos (/ K 2)) -2) J)))>
* * * * [misc]progress:  [ 34 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (6 enodes)
* [exit]simplify:  Simplified to (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 35 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (cos (/ K 2))) (* (sqrt (cos (/ K 2))) (* -2 J)))))>
* [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 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (cos (/ K 2))) (* (sqrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 36 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* 1 (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 37 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))>
* * * * [misc]progress:  [ 38 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (log1p (expm1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 39 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (expm1 (log1p (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 40 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 1)) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 41 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (exp (- (log (/ (/ U 2) J)) (log (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (- (log (/ (/ U 2) J)) (log (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (31 enodes)
* * [misc]simplify:  iters left: 3 (60 enodes)
* * [misc]simplify:  iters left: 2 (126 enodes)
* * [misc]simplify:  iters left: 1 (283 enodes)
* [exit]simplify:  Simplified to (- (log (/ (/ U 2) J)) (log (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (exp (- (log (/ (/ U 2) J)) (log (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 42 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (exp (log (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 43 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (log (exp (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 44 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (cbrt (/ (* (* (/ (/ U 2) J) (/ (/ U 2) J)) (/ (/ U 2) J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ (* (* (/ (/ U 2) J) (/ (/ U 2) J)) (/ (/ U 2) J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (107 enodes)
* * [misc]simplify:  iters left: 3 (431 enodes)
* [exit]simplify:  Simplified to (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3)
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (cbrt (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 45 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (* (cbrt (/ (/ (/ U 2) J) (cos (/ K 2)))) (cbrt (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 46 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (cbrt (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 47 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (sqrt (/ (/ (/ U 2) J) (cos (/ K 2)))) (sqrt (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 48 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (- (/ (/ U 2) J)) (- (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 49 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (39 enodes)
* [exit]simplify:  Simplified to (* (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))) (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* (* (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))) (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2))))) (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 50 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (sqrt (cos (/ K 2)))) (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (21 enodes)
* * [misc]simplify:  iters left: 3 (22 enodes)
* [exit]simplify:  Simplified to (* (cbrt (/ (/ U 2) J)) (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* (* (cbrt (/ (/ U 2) J)) (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))) (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (sqrt (cos (/ K 2)))) (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 51 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) 1) (/ (cbrt (/ (/ U 2) J)) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) 1)
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (24 enodes)
* * [misc]simplify:  iters left: 3 (29 enodes)
* * [misc]simplify:  iters left: 2 (34 enodes)
* [exit]simplify:  Simplified to (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J)))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (/ (cbrt (/ (/ U 2) J)) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (cbrt (/ (/ U 2) J)) (cos (/ K 2)))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (15 enodes)
* [exit]simplify:  Simplified to (/ (cbrt (/ (/ U 2) J)) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (/ (cbrt (/ (/ U 2) J)) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 52 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* [exit]simplify:  Simplified to (/ (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* (/ (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2)))) (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 53 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))) (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))) (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))) (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 54 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) 1) (/ (sqrt (/ (/ U 2) J)) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) 1)
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (17 enodes)
* [exit]simplify:  Simplified to (sqrt (/ (/ U 2) J))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* (sqrt (/ (/ U 2) J)) (/ (sqrt (/ (/ U 2) J)) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) (cos (/ K 2)))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (15 enodes)
* [exit]simplify:  Simplified to (/ (sqrt (/ (/ U 2) J)) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* (sqrt (/ (/ U 2) J)) (/ (sqrt (/ (/ U 2) J)) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 55 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ 1 (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ (/ U 2) J) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ 1 (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* [exit]simplify:  Simplified to (/ 1 (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* (/ 1 (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ (/ U 2) J) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (/ (/ U 2) J) (cbrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (14 enodes)
* * [misc]simplify:  iters left: 4 (20 enodes)
* * [misc]simplify:  iters left: 3 (27 enodes)
* * [misc]simplify:  iters left: 2 (39 enodes)
* * [misc]simplify:  iters left: 1 (40 enodes)
* [exit]simplify:  Simplified to (/ (/ (/ U 2) J) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* (/ 1 (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ (/ U 2) J) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 56 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ 1 (sqrt (cos (/ K 2)))) (/ (/ (/ U 2) J) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ 1 (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (7 enodes)
* * [misc]simplify:  iters left: 5 (9 enodes)
* [exit]simplify:  Simplified to (/ 1 (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* (/ 1 (sqrt (cos (/ K 2)))) (/ (/ (/ U 2) J) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (/ (/ U 2) J) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (14 enodes)
* * [misc]simplify:  iters left: 4 (20 enodes)
* * [misc]simplify:  iters left: 3 (27 enodes)
* * [misc]simplify:  iters left: 2 (39 enodes)
* * [misc]simplify:  iters left: 1 (40 enodes)
* [exit]simplify:  Simplified to (/ (/ (/ U 2) J) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* (/ 1 (sqrt (cos (/ K 2)))) (/ (/ (/ U 2) J) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 57 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ 1 1) (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ 1 1)
* * [misc]simplify:  iters left: 2 (2 enodes)
* * [misc]simplify:  iters left: 1 (4 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (/ (/ U 2) J) (cos (/ K 2)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (26 enodes)
* * [misc]simplify:  iters left: 2 (38 enodes)
* * [misc]simplify:  iters left: 1 (39 enodes)
* [exit]simplify:  Simplified to (/ (/ (/ U 2) J) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 58 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ (/ U 2) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ 1 J) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ (/ U 2) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (24 enodes)
* * [misc]simplify:  iters left: 2 (25 enodes)
* [exit]simplify:  Simplified to (/ (/ (/ U 2) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* (/ (/ (/ U 2) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2)))) (/ (/ 1 J) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (/ 1 J) (cbrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (/ 1 J) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* (/ (/ U 2) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ 1 J) (cbrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 59 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ (/ U 2) (sqrt (cos (/ K 2)))) (/ (/ 1 J) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ (/ U 2) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (10 enodes)
* * [misc]simplify:  iters left: 4 (13 enodes)
* [exit]simplify:  Simplified to (/ (/ U 2) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* (/ (/ U 2) (sqrt (cos (/ K 2)))) (/ (/ 1 J) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (/ 1 J) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (/ 1 J) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* (/ (/ U 2) (sqrt (cos (/ K 2)))) (/ (/ 1 J) (sqrt (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 60 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ (/ U 2) 1) (/ (/ 1 J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ (/ U 2) 1)
* * [misc]simplify:  iters left: 4 (5 enodes)
* * [misc]simplify:  iters left: 3 (9 enodes)
* [exit]simplify:  Simplified to (/ U 2)
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (* (/ U 2) (/ (/ 1 J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* [enter]simplify:  Simplifying (/ (/ 1 J) (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (8 enodes)
* * [misc]simplify:  iters left: 4 (12 enodes)
* * [misc]simplify:  iters left: 3 (15 enodes)
* [exit]simplify:  Simplified to (/ (/ 1 J) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 1 2 2) to (λ (J K U) (* (hypot 1 (* (/ U 2) (/ (/ 1 J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 61 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 62 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* (/ (/ U 2) J) (/ 1 (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 63 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ 1 (/ (cos (/ K 2)) (/ (/ U 2) J)))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 64 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ (/ U 2) J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))>
* [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 2) to (λ (J K U) (* (hypot 1 (/ (/ (/ (/ U 2) J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 65 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ (/ U 2) J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))>
* [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 2) to (λ (J K U) (* (hypot 1 (/ (/ (/ (/ U 2) J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 66 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ (/ U 2) J) 1) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))>
* [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 2) to (λ (J K U) (* (hypot 1 (/ (/ (/ (/ U 2) J) 1) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 67 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (/ (cos (/ K 2)) (cbrt (/ (/ U 2) J))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J)))
* * [misc]simplify:  iters left: 6 (7 enodes)
* * [misc]simplify:  iters left: 5 (9 enodes)
* * [misc]simplify:  iters left: 4 (12 enodes)
* [exit]simplify:  Simplified to (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J)))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (/ (cos (/ K 2)) (cbrt (/ (/ U 2) J))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 68 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (sqrt (/ (/ U 2) J)) (/ (cos (/ K 2)) (sqrt (/ (/ U 2) J))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (sqrt (/ (/ U 2) J))
* * [misc]simplify:  iters left: 5 (6 enodes)
* * [misc]simplify:  iters left: 4 (8 enodes)
* * [misc]simplify:  iters left: 3 (11 enodes)
* [exit]simplify:  Simplified to (sqrt (/ (/ U 2) J))
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (/ (sqrt (/ (/ U 2) J)) (/ (cos (/ K 2)) (sqrt (/ (/ U 2) J))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 69 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ 1 (/ (cos (/ K 2)) (/ (/ U 2) J)))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 70 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ U 2) (/ (cos (/ K 2)) (/ 1 J)))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ U 2)
* * [misc]simplify:  iters left: 2 (3 enodes)
* [exit]simplify:  Simplified to (/ U 2)
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (/ (/ U 2) (/ (cos (/ K 2)) (/ 1 J)))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 71 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ U 2) (* (cos (/ K 2)) J))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (/ U 2)
* * [misc]simplify:  iters left: 2 (3 enodes)
* [exit]simplify:  Simplified to (/ U 2)
* [misc]simplify:  Simplified (2 1 2 1) to (λ (J K U) (* (hypot 1 (/ (/ U 2) (* (cos (/ K 2)) J))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 72 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (log1p (expm1 (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 73 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (expm1 (log1p (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 74 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 75 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 76 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (exp (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 77 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (log (exp (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 78 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 79 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (cbrt (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 80 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 81 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* 1 (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))>
* * * * [misc]progress:  [ 82 / 93 ] simplifiying candidate #<alt (λ (J K U) (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J)))))>
* [enter]simplify:  Simplifying (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (47 enodes)
* * [misc]simplify:  iters left: 3 (80 enodes)
* * [misc]simplify:  iters left: 2 (117 enodes)
* * [misc]simplify:  iters left: 1 (158 enodes)
* [exit]simplify:  Simplified to (- (* (- J) 2) (/ (* 1/4 U) (/ J U)))
* [misc]simplify:  Simplified (2) to (λ (J K U) (- (* (- J) 2) (/ (* 1/4 U) (/ J U))))
* * * * [misc]progress:  [ 83 / 93 ] simplifiying candidate #<alt (λ (J K U) (* -1 U))>
* [enter]simplify:  Simplifying (* -1 U)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (- U)
* [misc]simplify:  Simplified (2) to (λ (J K U) (- U))
* * * * [misc]progress:  [ 84 / 93 ] simplifiying candidate #<alt (λ (J K U) (* -1 U))>
* [enter]simplify:  Simplifying (* -1 U)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (- U)
* [misc]simplify:  Simplified (2) to (λ (J K U) (- U))
* * * * [misc]progress:  [ 85 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (- (* 1/4 (* (pow K 2) J)) (* 2 J))))>
* [enter]simplify:  Simplifying (- (* 1/4 (* (pow K 2) J)) (* 2 J))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (41 enodes)
* * [misc]simplify:  iters left: 3 (71 enodes)
* * [misc]simplify:  iters left: 2 (88 enodes)
* * [misc]simplify:  iters left: 1 (90 enodes)
* [exit]simplify:  Simplified to (* (fma K (* 1/4 K) (- 2)) J)
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (fma K (* 1/4 K) (- 2)) J)))
* * * * [misc]progress:  [ 86 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* -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 2) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (* K 1/2)) (* J -2))))
* * * * [misc]progress:  [ 87 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* -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 2) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (* K 1/2)) (* J -2))))
* * * * [misc]progress:  [ 88 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (+ (* 1/16 (/ (* (pow K 2) U) J)) (* 1/2 (/ U J)))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (+ (* 1/16 (/ (* (pow K 2) U) J)) (* 1/2 (/ U J)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (48 enodes)
* * [misc]simplify:  iters left: 3 (90 enodes)
* * [misc]simplify:  iters left: 2 (153 enodes)
* * [misc]simplify:  iters left: 1 (253 enodes)
* [exit]simplify:  Simplified to (* U (fma (* K K) (/ 1/16 J) (/ 1/2 J)))
* [misc]simplify:  Simplified (2 1 2) to (λ (J K U) (* (hypot 1 (* U (fma (* K K) (/ 1/16 J) (/ 1/2 J)))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 89 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* 1/2 (/ U (* (cos (* 1/2 K)) J)))) (* (cos (/ K 2)) (* -2 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 1 2) to (λ (J K U) (* (hypot 1 (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 90 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (* 1/2 (/ U (* (cos (* 1/2 K)) J)))) (* (cos (/ K 2)) (* -2 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 1 2) to (λ (J K U) (* (hypot 1 (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 91 / 93 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* 1 (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 92 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* 1/2 (/ U (* (cos (* 1/2 K)) J))) (* (cos (/ K 2)) (* -2 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 1) to (λ (J K U) (* (/ (/ (* 1/2 U) J) (cos (* 1/2 K))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 93 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* 1/2 (/ U (* (cos (* 1/2 K)) J))) (* (cos (/ K 2)) (* -2 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 1) to (λ (J K U) (* (/ (/ (* 1/2 U) J) (cos (* 1/2 K))) (* (cos (/ K 2)) (* -2 J))))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 2 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 1 1 2)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 1)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 1 1)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)) in K
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) 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 (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) 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 (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)) in J
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (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 (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) 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 (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)) in U
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [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 (* -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 (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)) in U
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [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 (* -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 (* (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 (* -2 J) into (* -2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (* -2 J)) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (* 1/2 K)) 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 (* (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 (+ (* -2 0) (* 0 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 (+ (* 1 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 (* -2 J))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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 (* (cos (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (* -2 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 (+ (* -2 0) (+ (* 0 0) (* 0 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 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) (+ (* 0 0) (* 0 1))) 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 0) (+ (* 0 0) (* (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (cos (* 1/2 K))))) into (* 1/8 (/ 1 (* (cos (* 1/2 K)) (pow J 2))))
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* (* 1/8 (/ 1 (* (cos (* 1/2 K)) (pow J 2)))) (* -2 J)))) into (- (* 1/4 (/ 1 (* (cos (* 1/2 K)) J))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (* 1/2 K)) J))) 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 (/ 1 (* (cos (* 1/2 K)) J)) in 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)) 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 (+ (* 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)) 1) (* 0 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/4 (/ 1 (cos (* 1/2 K)))) into (/ 1/4 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (- (/ 1/4 (cos (* 1/2 K)))) into (- (* 1/4 (/ 1 (cos (* 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (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 (cos (* 1/2 K))) 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 -1/4 into -1/4
* [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 (+ (* 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)) 1) (* 0 0)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (+ (* -2 (cos (* 1/2 K))) (* 0 0)) 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 (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 J)))) 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 (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) 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]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* (* 1/8 (/ 1 (* (cos (* 1/2 K)) (pow J 2)))) 0) (* 0 (* -2 J))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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/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 1) (* 0 0))) 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]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 (+ (* 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 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 (cos (* 1/2 K))) (* 0 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)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 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 (+ (* -2 (* 1 (* J 1))) (* -1/4 (* 1 (* (/ 1 J) (pow U 2))))) into (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J))))
* [misc]approximate:  Taking taylor expansion of (* (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))) in K
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 1) into 1
* [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 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) 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 (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)) 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 (* (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))) in J
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [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)) 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 (* (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))) in U
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [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 (* -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 (* (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))) in U
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [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 (* -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 (* (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)))) (cos (/ 1/2 K))) into (* 1/2 J)
* [misc]backup-simplify:  Simplify (* -2 (/ 1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (* 1/2 J) (/ -2 J)) into -1
* [misc]taylor:  Taking taylor expansion of -1 in J
* [misc]backup-simplify:  Simplify -1 into -1
* [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) 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/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 J) 0) (* 0 (/ -2 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 -1 in K
* [misc]backup-simplify:  Simplify -1 into -1
* [misc]backup-simplify:  Simplify -1 into -1
* [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 (+ (* -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 1) into 1
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* (/ (cos (/ 1/2 K)) J) (cos (/ 1/2 K))))) into (/ (pow (cos (/ 1/2 K)) 2) J)
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 J) 0) (+ (* 0 0) (* (/ (pow (cos (/ 1/2 K)) 2) J) (/ -2 J)))) into (- (* 2 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [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 (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) 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 (cos (/ 1/2 K))) 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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (/ (pow (cos (/ 1/2 K)) 2) 1) into (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ 1/2 K)) 2) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (pow (cos (/ 1/2 K)) 2))) 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]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 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 (+ 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) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) 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 (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) 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 (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 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 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]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (+ (* (/ (cos (/ 1/2 K)) J) 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 J) 0) (+ (* 0 0) (+ (* (/ (pow (cos (/ 1/2 K)) 2) J) 0) (* 0 (/ -2 J))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 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 (+ (* 2 0) (+ (* 0 0) (* 0 (pow (cos (/ 1/2 K)) 2)))) 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 (* 1 (* 1 (/ 1 (/ 1 U))))) into (* -1 U)
* [misc]approximate:  Taking taylor expansion of (* (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))) in K
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 (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))) 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 (* (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))) in J
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [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))) 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 (* (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))) in U
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [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 (* -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 (* (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))) in U
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [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 (* -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 (* (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)))) (cos (/ -1/2 K))) into (* 1/2 J)
* [misc]backup-simplify:  Simplify (* -2 (/ -1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (* 1/2 J) (/ 2 J)) into 1
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [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) 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 (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 J) 0) (* 0 (/ 2 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 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [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 (+ (* -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 (* 1 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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* (/ (cos (/ -1/2 K)) J) (cos (/ -1/2 K))))) into (/ (pow (cos (/ -1/2 K)) 2) J)
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 J) 0) (+ (* 0 0) (* (/ (pow (cos (/ -1/2 K)) 2) J) (/ 2 J)))) into (* 2 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [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 (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) 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 (cos (/ -1/2 K))) 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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (/ (pow (cos (/ -1/2 K)) 2) 1) into (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ -1/2 K)) 2) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 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 (+ 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 (+ (* 1 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 (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) 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 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 (- 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) 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 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 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]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (+ (* (/ (cos (/ -1/2 K)) J) 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 J) 0) (+ (* 0 0) (+ (* (/ (pow (cos (/ -1/2 K)) 2) J) 0) (* 0 (/ 2 J))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 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 (+ (* 2 0) (+ (* 0 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 (* 1 (* 1 (/ 1 (/ 1 (- U)))))) into (* -1 U)
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2 1 1 2)
* [misc]approximate:  Taking taylor expansion of (/ (/ (/ U 2) J) (cos (/ K 2))) in (U J K) around 0
* [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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 J
* [misc]taylor:  Taking taylor expansion of (/ (/ U 2) J) in J
* [misc]taylor:  Taking taylor expansion of (/ U 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 U
* [misc]taylor:  Taking taylor expansion of (/ (/ U 2) J) in U
* [misc]taylor:  Taking taylor expansion of (/ 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 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 (/ 1/2 (* (cos (* 1/2 K)) J)) 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 (* (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)) 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 (+ (* 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)) 1) (* 0 0)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (/ 1/2 (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 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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/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 1) (* 0 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]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 1) (+ (* 1/2 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 J)) (* 0 (/ 0 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 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 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (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 (+ 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 1) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (cos (* 1/2 K))) (/ 0 (cos (* 1/2 K)))) (* 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 (+ (* -1 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* 1/2 (/ (- 1/8) 1)) (* 0 (/ 0 1)))) into 1/16
* [misc]backup-simplify:  Simplify 1/16 into 1/16
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (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 (/ (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 (+ (* 1/2 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 K))))) 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 (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 1) (* 0 0))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (cos (* 1/2 K))) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))) (* 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 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1/16 (* (pow K 2) (* (/ 1 J) U))) (* 1/2 (* 1 (* (/ 1 J) U)))) into (+ (* 1/16 (/ (* (pow K 2) U) J)) (* 1/2 (/ U J)))
* [misc]approximate:  Taking taylor expansion of (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) in (U J K) around 0
* [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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) 2) (/ 1 J)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 U) 2) (/ 1 J)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 U) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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/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]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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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]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]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 (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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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]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 (/ (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]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 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) in (U J K) around 0
* [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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 J
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 U
* [misc]taylor:  Taking taylor expansion of (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- U)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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/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]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 (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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]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]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 (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 (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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]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 (/ (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]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)
* [misc]approximate:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) 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 (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 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (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 (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 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [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 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [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 (cos (* 1/2 K))) into (cos (* 1/2 K))
* [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 (+ 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 (+ (* 1 0) (* 0 (cos (* 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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]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 into 1
* [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 (+ (* 1 0) (+ (* 0 0) (* 0 1))) 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 0) (+ (* 0 0) (* (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (cos (* 1/2 K))))) into (* 1/8 (/ 1 (* (cos (* 1/2 K)) (pow J 2))))
* [misc]taylor:  Taking taylor expansion of (* 1/8 (/ 1 (* (cos (* 1/2 K)) (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 (/ 1 (* (cos (* 1/2 K)) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (cos (* 1/2 K)) (pow J 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]taylor:  Taking taylor expansion of (pow J 2) in 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 (* (cos (* 1/2 K)) 1) 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 (+ (* 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 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (cos (* 1/2 K))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/8 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]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 (+ (* 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]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 (+ 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 (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) 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]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [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/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 1))) 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/8 0) (+ (* 0 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]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 (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 1) into 1
* [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 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) 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 (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 (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [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 (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [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 (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [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)))) (cos (/ 1/2 K))) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (* 1/2 J) 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 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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 (- (+ (* (/ 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/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (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 1) (* 0 0)) into 1/2
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]backup-simplify:  Simplify 1/2 into 1/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 (- (+ (* (/ 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 1) into 1
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* (/ (cos (/ 1/2 K)) J) (cos (/ 1/2 K))))) into (/ (pow (cos (/ 1/2 K)) 2) J)
* [misc]taylor:  Taking taylor expansion of (/ (pow (cos (/ 1/2 K)) 2) J) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) 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 (cos (/ 1/2 K))) 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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 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 (/ (pow (cos (/ 1/2 K)) 2) 1) into (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ 1/2 K)) 2) (/ 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 (+ (* 1/2 0) (+ (* 0 1) (* 0 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/2 (* 1 (* (/ 1 J) (/ 1 (/ 1 U))))) into (* 1/2 (/ U J))
* [misc]approximate:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 (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 (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [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 (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [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 (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [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)))) (cos (/ -1/2 K))) into (* 1/2 J)
* [misc]taylor:  Taking taylor expansion of (* 1/2 J) 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 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 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) 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 (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (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 1) (* 0 0)) into 1/2
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]backup-simplify:  Simplify 1/2 into 1/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) 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 (* 1 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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* (/ (cos (/ -1/2 K)) J) (cos (/ -1/2 K))))) into (/ (pow (cos (/ -1/2 K)) 2) J)
* [misc]taylor:  Taking taylor expansion of (/ (pow (cos (/ -1/2 K)) 2) J) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) 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 (cos (/ -1/2 K))) 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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 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 (/ (pow (cos (/ -1/2 K)) 2) 1) into (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ -1/2 K)) 2) (/ 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 (+ (* 1/2 0) (+ (* 0 1) (* 0 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/2 (* 1 (* (/ 1 (- J)) (/ 1 (/ 1 (- U)))))) into (* 1/2 (/ U J))
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 1 1)
* [misc]approximate:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) 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 (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (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 (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [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 0) (+ (* 0 0) (* 0 1))) 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]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 (exp (* 2 (log (cos (* 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (* 1/2 K)))) 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 (cos (* 1/2 K))) 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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (* 1/2 K)))) into (* 2 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [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 (+ 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (* 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 1) 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/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 (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) 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 (/ (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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (* 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (* 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) 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 (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 1) into 1
* [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 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) 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 (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 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 1) into 1
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 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) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) 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 (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) 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 (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 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 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 (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 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 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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 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) (* 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 (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) 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 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 (- 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) 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 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 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:  simplifying candidates
* * * * [misc]progress:  [ 1 / 93 ] simplifiying candidate #<alt (λ (J K U) (log1p (expm1 (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 2 / 93 ] simplifiying candidate #<alt (λ (J K U) (expm1 (log1p (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 3 / 93 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)) 1))>
* [enter]simplify:  Simplifying (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (28 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (81 enodes)
* * [misc]simplify:  iters left: 2 (103 enodes)
* * [misc]simplify:  iters left: 1 (104 enodes)
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* J -2) (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* J -2) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 4 / 93 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)) 1))>
* [enter]simplify:  Simplifying (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (28 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (81 enodes)
* * [misc]simplify:  iters left: 2 (103 enodes)
* * [misc]simplify:  iters left: 1 (104 enodes)
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* J -2) (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* J -2) (cos (/ K 2)))) 1))
* * * * [misc]progress:  [ 5 / 93 ] simplifiying candidate #<alt (λ (J K U) (pow (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)) 1))>
* * * * [misc]progress:  [ 6 / 93 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (log (cos (/ K 2)))) (log (* -2 J)))))>
* [enter]simplify:  Simplifying (+ (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (log (cos (/ K 2)))) (log (* -2 J)))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (51 enodes)
* * [misc]simplify:  iters left: 3 (83 enodes)
* * [misc]simplify:  iters left: 2 (109 enodes)
* * [misc]simplify:  iters left: 1 (115 enodes)
* [exit]simplify:  Simplified to (+ (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (+ (log (* -2 J)) (log (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (+ (log (* -2 J)) (log (cos (/ K 2)))))))
* * * * [misc]progress:  [ 7 / 93 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))) (log (* -2 J)))))>
* [enter]simplify:  Simplifying (+ (log (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))) (log (* -2 J)))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (48 enodes)
* * [misc]simplify:  iters left: 3 (77 enodes)
* * [misc]simplify:  iters left: 2 (105 enodes)
* * [misc]simplify:  iters left: 1 (111 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (cos (/ K 2))) (log (* J -2))) (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (+ (log (cos (/ K 2))) (log (* J -2))) (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 8 / 93 ] simplifiying candidate #<alt (λ (J K U) (exp (log (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 9 / 93 ] simplifiying candidate #<alt (λ (J K U) (log (exp (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 10 / 93 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))) (* (* (* -2 J) (* -2 J)) (* -2 J)))))>
* [enter]simplify:  Simplifying (* (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))) (* (* (* -2 J) (* -2 J)) (* -2 J)))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (146 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* -2 J) 3))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* -2 J) 3))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 11 / 93 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))) (* (* (* -2 J) (* -2 J)) (* -2 J)))))>
* [enter]simplify:  Simplifying (* (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))) (* (* (* -2 J) (* -2 J)) (* -2 J)))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (46 enodes)
* * [misc]simplify:  iters left: 4 (132 enodes)
* * [misc]simplify:  iters left: 3 (491 enodes)
* [exit]simplify:  Simplified to (* (* (pow (* -2 J) 3) (pow (cos (/ K 2)) 3)) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (pow (* -2 J) 3) (pow (cos (/ K 2)) 3)) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3))))
* * * * [misc]progress:  [ 12 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (cbrt (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J))) (cbrt (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))) (cbrt (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 13 / 93 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J))) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 14 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J))) (sqrt (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 15 / 93 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J))))>
* * * * [misc]progress:  [ 16 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) -2) J))>
* * * * [misc]progress:  [ 17 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (17 enodes)
* * [misc]simplify:  iters left: 4 (23 enodes)
* * [misc]simplify:  iters left: 3 (30 enodes)
* * [misc]simplify:  iters left: 2 (42 enodes)
* * [misc]simplify:  iters left: 1 (43 enodes)
* [exit]simplify:  Simplified to (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 18 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* -2 J) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))))>
* * * * [misc]progress:  [ 19 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (log1p (expm1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 20 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (expm1 (log1p (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 21 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 1)) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 22 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (exp (- (log (/ (/ U 2) J)) (log (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (- (log (/ (/ U 2) J)) (log (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (31 enodes)
* * [misc]simplify:  iters left: 3 (60 enodes)
* * [misc]simplify:  iters left: 2 (126 enodes)
* * [misc]simplify:  iters left: 1 (283 enodes)
* [exit]simplify:  Simplified to (- (log (/ (/ U 2) J)) (log (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (exp (- (log (/ (/ U 2) J)) (log (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 23 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (exp (log (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 24 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (log (exp (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 25 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (cbrt (/ (* (* (/ (/ U 2) J) (/ (/ U 2) J)) (/ (/ U 2) J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ (* (* (/ (/ U 2) J) (/ (/ U 2) J)) (/ (/ U 2) J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (107 enodes)
* * [misc]simplify:  iters left: 3 (431 enodes)
* [exit]simplify:  Simplified to (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3)
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (cbrt (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 3))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 26 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (* (cbrt (/ (/ (/ U 2) J) (cos (/ K 2)))) (cbrt (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 27 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (cbrt (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 28 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (sqrt (/ (/ (/ U 2) J) (cos (/ K 2)))) (sqrt (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 29 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ (- (/ (/ U 2) J)) (- (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 30 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (39 enodes)
* [exit]simplify:  Simplified to (* (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))) (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* (* (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))) (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2))))) (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (cbrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 31 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (sqrt (cos (/ K 2)))) (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (21 enodes)
* * [misc]simplify:  iters left: 3 (22 enodes)
* [exit]simplify:  Simplified to (* (cbrt (/ (/ U 2) J)) (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* (* (cbrt (/ (/ U 2) J)) (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))) (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (sqrt (cos (/ K 2)))) (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 32 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) 1) (/ (cbrt (/ (/ U 2) J)) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) 1)
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (24 enodes)
* * [misc]simplify:  iters left: 3 (29 enodes)
* * [misc]simplify:  iters left: 2 (34 enodes)
* [exit]simplify:  Simplified to (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J)))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (/ (cbrt (/ (/ U 2) J)) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (cbrt (/ (/ U 2) J)) (cos (/ K 2)))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (15 enodes)
* [exit]simplify:  Simplified to (/ (cbrt (/ (/ U 2) J)) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (/ (cbrt (/ (/ U 2) J)) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 33 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* [exit]simplify:  Simplified to (/ (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* (/ (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2)))) (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 34 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))) (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))) (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))) (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 35 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) 1) (/ (sqrt (/ (/ U 2) J)) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) 1)
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (17 enodes)
* [exit]simplify:  Simplified to (sqrt (/ (/ U 2) J))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* (sqrt (/ (/ U 2) J)) (/ (sqrt (/ (/ U 2) J)) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (sqrt (/ (/ U 2) J)) (cos (/ K 2)))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* * [misc]simplify:  iters left: 4 (15 enodes)
* [exit]simplify:  Simplified to (/ (sqrt (/ (/ U 2) J)) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* (sqrt (/ (/ U 2) J)) (/ (sqrt (/ (/ U 2) J)) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 36 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ 1 (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ (/ U 2) J) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ 1 (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (12 enodes)
* [exit]simplify:  Simplified to (/ 1 (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* (/ 1 (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ (/ U 2) J) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (/ (/ U 2) J) (cbrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (14 enodes)
* * [misc]simplify:  iters left: 4 (20 enodes)
* * [misc]simplify:  iters left: 3 (27 enodes)
* * [misc]simplify:  iters left: 2 (39 enodes)
* * [misc]simplify:  iters left: 1 (40 enodes)
* [exit]simplify:  Simplified to (/ (/ (/ U 2) J) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* (/ 1 (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ (/ U 2) J) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 37 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ 1 (sqrt (cos (/ K 2)))) (/ (/ (/ U 2) J) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ 1 (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (7 enodes)
* * [misc]simplify:  iters left: 5 (9 enodes)
* [exit]simplify:  Simplified to (/ 1 (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* (/ 1 (sqrt (cos (/ K 2)))) (/ (/ (/ U 2) J) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (/ (/ U 2) J) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (14 enodes)
* * [misc]simplify:  iters left: 4 (20 enodes)
* * [misc]simplify:  iters left: 3 (27 enodes)
* * [misc]simplify:  iters left: 2 (39 enodes)
* * [misc]simplify:  iters left: 1 (40 enodes)
* [exit]simplify:  Simplified to (/ (/ (/ U 2) J) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* (/ 1 (sqrt (cos (/ K 2)))) (/ (/ (/ U 2) J) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 38 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ 1 1) (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ 1 1)
* * [misc]simplify:  iters left: 2 (2 enodes)
* * [misc]simplify:  iters left: 1 (4 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (/ (/ U 2) J) (cos (/ K 2)))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (26 enodes)
* * [misc]simplify:  iters left: 2 (38 enodes)
* * [misc]simplify:  iters left: 1 (39 enodes)
* [exit]simplify:  Simplified to (/ (/ (/ U 2) J) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 39 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ (/ U 2) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ 1 J) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ (/ U 2) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (24 enodes)
* * [misc]simplify:  iters left: 2 (25 enodes)
* [exit]simplify:  Simplified to (/ (/ (/ U 2) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* (/ (/ (/ U 2) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2)))) (/ (/ 1 J) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (/ 1 J) (cbrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (/ 1 J) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* (/ (/ U 2) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ 1 J) (cbrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 40 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ (/ U 2) (sqrt (cos (/ K 2)))) (/ (/ 1 J) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ (/ U 2) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (10 enodes)
* * [misc]simplify:  iters left: 4 (13 enodes)
* [exit]simplify:  Simplified to (/ (/ U 2) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* (/ (/ U 2) (sqrt (cos (/ K 2)))) (/ (/ 1 J) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (/ 1 J) (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* [exit]simplify:  Simplified to (/ (/ 1 J) (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* (/ (/ U 2) (sqrt (cos (/ K 2)))) (/ (/ 1 J) (sqrt (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 41 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ (/ U 2) 1) (/ (/ 1 J) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ (/ U 2) 1)
* * [misc]simplify:  iters left: 4 (5 enodes)
* * [misc]simplify:  iters left: 3 (9 enodes)
* [exit]simplify:  Simplified to (/ U 2)
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (* (/ U 2) (/ (/ 1 J) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))
* [enter]simplify:  Simplifying (/ (/ 1 J) (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (8 enodes)
* * [misc]simplify:  iters left: 4 (12 enodes)
* * [misc]simplify:  iters left: 3 (15 enodes)
* [exit]simplify:  Simplified to (/ (/ 1 J) (cos (/ K 2)))
* [misc]simplify:  Simplified (2 1 1 2 2) to (λ (J K U) (* (* (hypot 1 (* (/ U 2) (/ (/ 1 J) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 42 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 43 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* (/ (/ U 2) J) (/ 1 (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 44 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ 1 (/ (cos (/ K 2)) (/ (/ U 2) J)))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 45 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ (/ U 2) J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))>
* [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 1 2 2) to (λ (J K U) (* (* (hypot 1 (/ (/ (/ (/ U 2) J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 46 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ (/ U 2) J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))>
* [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 1 2 2) to (λ (J K U) (* (* (hypot 1 (/ (/ (/ (/ U 2) J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 47 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ (/ U 2) J) 1) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))>
* [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 1 2 2) to (λ (J K U) (* (* (hypot 1 (/ (/ (/ (/ U 2) J) 1) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 48 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (/ (cos (/ K 2)) (cbrt (/ (/ U 2) J))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J)))
* * [misc]simplify:  iters left: 6 (7 enodes)
* * [misc]simplify:  iters left: 5 (9 enodes)
* * [misc]simplify:  iters left: 4 (12 enodes)
* [exit]simplify:  Simplified to (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J)))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (/ (cos (/ K 2)) (cbrt (/ (/ U 2) J))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 49 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ (sqrt (/ (/ U 2) J)) (/ (cos (/ K 2)) (sqrt (/ (/ U 2) J))))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (sqrt (/ (/ U 2) J))
* * [misc]simplify:  iters left: 5 (6 enodes)
* * [misc]simplify:  iters left: 4 (8 enodes)
* * [misc]simplify:  iters left: 3 (11 enodes)
* [exit]simplify:  Simplified to (sqrt (/ (/ U 2) J))
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (/ (sqrt (/ (/ U 2) J)) (/ (cos (/ K 2)) (sqrt (/ (/ U 2) J))))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 50 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ 1 (/ (cos (/ K 2)) (/ (/ U 2) J)))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 51 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ (/ U 2) (/ (cos (/ K 2)) (/ 1 J)))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ U 2)
* * [misc]simplify:  iters left: 2 (3 enodes)
* [exit]simplify:  Simplified to (/ U 2)
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (/ (/ U 2) (/ (cos (/ K 2)) (/ 1 J)))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 52 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ (/ U 2) (* (cos (/ K 2)) J))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (/ U 2)
* * [misc]simplify:  iters left: 2 (3 enodes)
* [exit]simplify:  Simplified to (/ U 2)
* [misc]simplify:  Simplified (2 1 1 2 1) to (λ (J K U) (* (* (hypot 1 (/ (/ U 2) (* (cos (/ K 2)) J))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 53 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (log1p (expm1 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))))) (* -2 J)))>
* * * * [misc]progress:  [ 54 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (expm1 (log1p (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))))) (* -2 J)))>
* * * * [misc]progress:  [ 55 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (pow (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) 1) (* -2 J)))>
* [enter]simplify:  Simplifying (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (32 enodes)
* * [misc]simplify:  iters left: 2 (44 enodes)
* * [misc]simplify:  iters left: 1 (45 enodes)
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 1) (* -2 J)))
* * * * [misc]progress:  [ 56 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (pow (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) 1) (* -2 J)))>
* * * * [misc]progress:  [ 57 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (exp (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (log (cos (/ K 2))))) (* -2 J)))>
* [enter]simplify:  Simplifying (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (log (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (27 enodes)
* * [misc]simplify:  iters left: 3 (34 enodes)
* * [misc]simplify:  iters left: 2 (46 enodes)
* * [misc]simplify:  iters left: 1 (47 enodes)
* [exit]simplify:  Simplified to (+ (log (cos (/ K 2))) (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (exp (+ (log (cos (/ K 2))) (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (* -2 J)))
* * * * [misc]progress:  [ 58 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (exp (log (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))))) (* -2 J)))>
* * * * [misc]progress:  [ 59 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (log (exp (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))))) (* -2 J)))>
* * * * [misc]progress:  [ 60 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (cbrt (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))) (* -2 J)))>
* [enter]simplify:  Simplifying (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (29 enodes)
* * [misc]simplify:  iters left: 4 (60 enodes)
* * [misc]simplify:  iters left: 3 (100 enodes)
* * [misc]simplify:  iters left: 2 (136 enodes)
* * [misc]simplify:  iters left: 1 (138 enodes)
* [exit]simplify:  Simplified to (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (cbrt (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)) (* -2 J)))
* * * * [misc]progress:  [ 61 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))) (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))))) (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))))) (* -2 J)))>
* * * * [misc]progress:  [ 62 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (cbrt (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))))) (* -2 J)))>
* * * * [misc]progress:  [ 63 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (sqrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))) (sqrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))))) (* -2 J)))>
* * * * [misc]progress:  [ 64 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* 1 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))) (* -2 J)))>
* * * * [misc]progress:  [ 65 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* -2 J)))>
* [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) (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* -2 J)))
* * * * [misc]progress:  [ 66 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (* -2 J)))>
* [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) (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (* -2 J)))
* * * * [misc]progress:  [ 67 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1) (cos (/ K 2))) (* -2 J)))>
* [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) (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 68 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2)))) (* -2 J)))>
* [enter]simplify:  Simplifying (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (32 enodes)
* * [misc]simplify:  iters left: 2 (44 enodes)
* * [misc]simplify:  iters left: 1 (45 enodes)
* [exit]simplify:  Simplified to (* (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (* (* (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2)))) (* -2 J)))
* * * * [misc]progress:  [ 69 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2)))) (* -2 J)))>
* [enter]simplify:  Simplifying (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (24 enodes)
* * [misc]simplify:  iters left: 3 (31 enodes)
* * [misc]simplify:  iters left: 2 (43 enodes)
* * [misc]simplify:  iters left: 1 (44 enodes)
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (* (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2)))) (* -2 J)))
* * * * [misc]progress:  [ 70 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* 1 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2)))) (* -2 J)))>
* * * * [misc]progress:  [ 71 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (cos (/ K 2)) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* -2 J)))>
* * * * [misc]progress:  [ 72 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (log1p (expm1 (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 73 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (expm1 (log1p (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 74 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 75 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 76 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (exp (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 77 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (log (exp (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 78 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 79 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (cbrt (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 80 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 81 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* 1 (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J)))>
* * * * [misc]progress:  [ 82 / 93 ] simplifiying candidate #<alt (λ (J K U) (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J)))))>
* [enter]simplify:  Simplifying (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (47 enodes)
* * [misc]simplify:  iters left: 3 (80 enodes)
* * [misc]simplify:  iters left: 2 (117 enodes)
* * [misc]simplify:  iters left: 1 (158 enodes)
* [exit]simplify:  Simplified to (- (* (- J) 2) (/ (* 1/4 U) (/ J U)))
* [misc]simplify:  Simplified (2) to (λ (J K U) (- (* (- J) 2) (/ (* 1/4 U) (/ J U))))
* * * * [misc]progress:  [ 83 / 93 ] simplifiying candidate #<alt (λ (J K U) (* -1 U))>
* [enter]simplify:  Simplifying (* -1 U)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (- U)
* [misc]simplify:  Simplified (2) to (λ (J K U) (- U))
* * * * [misc]progress:  [ 84 / 93 ] simplifiying candidate #<alt (λ (J K U) (* -1 U))>
* [enter]simplify:  Simplifying (* -1 U)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (- U)
* [misc]simplify:  Simplified (2) to (λ (J K U) (- U))
* * * * [misc]progress:  [ 85 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (+ (* 1/16 (/ (* (pow K 2) U) J)) (* 1/2 (/ U J)))) (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying (+ (* 1/16 (/ (* (pow K 2) U) J)) (* 1/2 (/ U J)))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (48 enodes)
* * [misc]simplify:  iters left: 3 (90 enodes)
* * [misc]simplify:  iters left: 2 (153 enodes)
* * [misc]simplify:  iters left: 1 (253 enodes)
* [exit]simplify:  Simplified to (* U (fma (* K K) (/ 1/16 J) (/ 1/2 J)))
* [misc]simplify:  Simplified (2 1 1 2) to (λ (J K U) (* (* (hypot 1 (* U (fma (* K K) (/ 1/16 J) (/ 1/2 J)))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 86 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* 1/2 (/ U (* (cos (* 1/2 K)) J)))) (cos (/ K 2))) (* -2 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 1 1 2) to (λ (J K U) (* (* (hypot 1 (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 87 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (* 1/2 (/ U (* (cos (* 1/2 K)) J)))) (cos (/ K 2))) (* -2 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 1 1 2) to (λ (J K U) (* (* (hypot 1 (/ (/ (* 1/2 U) J) (cos (* 1/2 K)))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 88 / 93 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* -2 J)))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* 1 (* -2 J)))
* * * * [misc]progress:  [ 89 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* 1/2 (/ U J)) (* -2 J)))>
* [enter]simplify:  Simplifying (* 1/2 (/ U J))
* * [misc]simplify:  iters left: 4 (5 enodes)
* * [misc]simplify:  iters left: 3 (8 enodes)
* * [misc]simplify:  iters left: 2 (12 enodes)
* * [misc]simplify:  iters left: 1 (14 enodes)
* [exit]simplify:  Simplified to (* (/ U J) 1/2)
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (* (/ U J) 1/2) (* -2 J)))
* * * * [misc]progress:  [ 90 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* 1/2 (/ U J)) (* -2 J)))>
* [enter]simplify:  Simplifying (* 1/2 (/ U J))
* * [misc]simplify:  iters left: 4 (5 enodes)
* * [misc]simplify:  iters left: 3 (8 enodes)
* * [misc]simplify:  iters left: 2 (12 enodes)
* * [misc]simplify:  iters left: 1 (14 enodes)
* [exit]simplify:  Simplified to (* (/ U J) 1/2)
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (* (/ U J) 1/2) (* -2 J)))
* * * * [misc]progress:  [ 91 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* 1 (cos (/ K 2))) (* -2 J)))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (* 1 (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 92 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* 1/2 (/ U (* (cos (* 1/2 K)) J))) (cos (/ K 2))) (* -2 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 1 1) to (λ (J K U) (* (* (/ (/ (* 1/2 U) J) (cos (* 1/2 K))) (cos (/ K 2))) (* -2 J)))
* * * * [misc]progress:  [ 93 / 93 ] simplifiying candidate #<alt (λ (J K U) (* (* (* 1/2 (/ U (* (cos (* 1/2 K)) J))) (cos (/ K 2))) (* -2 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 1 1) to (λ (J K U) (* (* (/ (/ (* 1/2 U) J) (cos (* 1/2 K))) (cos (/ K 2))) (* -2 J)))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 3 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * [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)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2 1)
* [misc]approximate:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) 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 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (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 (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ U (cos (* 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ U (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [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 0) (+ (* 0 0) (* 0 1))) 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/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/16 in J
* [misc]backup-simplify:  Simplify 1/16 into 1/16
* [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 (exp (* 2 (log (cos (* 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (* 1/2 K)))) 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 (cos (* 1/2 K))) 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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (* 1/2 K)))) into (* 2 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/16 (pow (cos (* 1/2 K)) 2)) into (/ 1/16 (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 (+ (* 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (* 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 1) 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/16 (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 (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) 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]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (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 (/ (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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (* 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (* 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) 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/16 (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 (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 1) into 1
* [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 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) 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 (sqrt (sqrt (+ (* 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/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (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 (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (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]taylor:  Taking taylor expansion of (* +nan.0 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 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 (pow (* +nan.0 (/ J (cos (/ 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) 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 (cos (/ 1/2 K))) 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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (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 (* +nan.0 (/ 1 (cos (/ 1/2 K)))) into (/ +nan.0 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ +nan.0 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of +nan.0 in K
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (/ +nan.0 (cos (/ 1/2 K))) into (/ +nan.0 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ +nan.0 (cos (/ 1/2 K))) into (/ +nan.0 (cos (/ 1/2 K)))
* [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 1) into 1
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (/ 1/2 K)) J) (+ (* 2 (* (* +nan.0 (/ J (cos (/ 1/2 K)))) (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3)))))
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]taylor:  Taking taylor expansion of (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3)))) in 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]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]taylor:  Taking taylor expansion of (/ (pow J 3) (pow (cos (/ 1/2 K)) 3)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 3) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 3 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 3 (log (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 3 in J
* [misc]backup-simplify:  Simplify 3 into 3
* [misc]taylor:  Taking taylor expansion of (log (cos (/ 1/2 K))) 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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 3 (log (cos (/ 1/2 K)))) into (* 3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 3)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 3)) into (/ 1 (pow (cos (/ 1/2 K)) 3))
* [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]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ (* +nan.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 (+ (* (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 (+ (* +nan.0 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]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 (* (/ +nan.0 (cos (/ 1/2 (/ 1 K)))) (* 1 (* (/ 1 J) 1))) into (/ +nan.0 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 (sqrt (sqrt (+ 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/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (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 (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (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]taylor:  Taking taylor expansion of (* +nan.0 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 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 (pow (* +nan.0 (/ J (cos (/ -1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) 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 (cos (/ -1/2 K))) 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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (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 (* +nan.0 (/ 1 (cos (/ -1/2 K)))) into (/ +nan.0 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ +nan.0 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of +nan.0 in K
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (/ +nan.0 (cos (/ -1/2 K))) into (/ +nan.0 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ +nan.0 (cos (/ -1/2 K))) into (/ +nan.0 (cos (/ -1/2 K)))
* [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 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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (/ -1/2 K)) J) (+ (* 2 (* (* +nan.0 (/ J (cos (/ -1/2 K)))) (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3)))))
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]taylor:  Taking taylor expansion of (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3)))) in 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]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]taylor:  Taking taylor expansion of (/ (pow J 3) (pow (cos (/ -1/2 K)) 3)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 3) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 3 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 3 (log (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 3 in J
* [misc]backup-simplify:  Simplify 3 into 3
* [misc]taylor:  Taking taylor expansion of (log (cos (/ -1/2 K))) 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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 3 (log (cos (/ -1/2 K)))) into (* 3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 3)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 3)) into (/ 1 (pow (cos (/ -1/2 K)) 3))
* [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]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ (* +nan.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 (+ (* (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 (+ (* +nan.0 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]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 (* (/ +nan.0 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* (/ 1 (- J)) 1))) into (/ +nan.0 (* (cos (* 1/2 K)) J))
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2 1)
* [misc]approximate:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) 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 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (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 (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ U (cos (* 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ U (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [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 0) (+ (* 0 0) (* 0 1))) 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/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 1/16 in J
* [misc]backup-simplify:  Simplify 1/16 into 1/16
* [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 (exp (* 2 (log (cos (* 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (* 1/2 K)))) 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 (cos (* 1/2 K))) 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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (* 1/2 K)))) into (* 2 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 2) 1) into (pow (cos (* 1/2 K)) 2)
* [misc]backup-simplify:  Simplify (/ 1/16 (pow (cos (* 1/2 K)) 2)) into (/ 1/16 (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 (+ (* 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (* 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 1) 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/16 (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 (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) 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]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (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 (/ (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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (* 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (* 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) 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/16 (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 (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 1) into 1
* [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 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) 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 (sqrt (sqrt (+ (* 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/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (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 (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (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]taylor:  Taking taylor expansion of (* +nan.0 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 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 (pow (* +nan.0 (/ J (cos (/ 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) 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 (cos (/ 1/2 K))) 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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (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 (* +nan.0 (/ 1 (cos (/ 1/2 K)))) into (/ +nan.0 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ +nan.0 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of +nan.0 in K
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (/ +nan.0 (cos (/ 1/2 K))) into (/ +nan.0 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ +nan.0 (cos (/ 1/2 K))) into (/ +nan.0 (cos (/ 1/2 K)))
* [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 1) into 1
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (/ 1/2 K)) J) (+ (* 2 (* (* +nan.0 (/ J (cos (/ 1/2 K)))) (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3)))))
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]taylor:  Taking taylor expansion of (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3)))) in 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]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]taylor:  Taking taylor expansion of (/ (pow J 3) (pow (cos (/ 1/2 K)) 3)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 3) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 3 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 3 (log (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 3 in J
* [misc]backup-simplify:  Simplify 3 into 3
* [misc]taylor:  Taking taylor expansion of (log (cos (/ 1/2 K))) 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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 3 (log (cos (/ 1/2 K)))) into (* 3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 3)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 3)) into (/ 1 (pow (cos (/ 1/2 K)) 3))
* [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]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ (* +nan.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 (+ (* (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 (+ (* +nan.0 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]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 (* (/ +nan.0 (cos (/ 1/2 (/ 1 K)))) (* 1 (* (/ 1 J) 1))) into (/ +nan.0 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 (sqrt (sqrt (+ 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/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (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 (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (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]taylor:  Taking taylor expansion of (* +nan.0 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 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 (pow (* +nan.0 (/ J (cos (/ -1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) 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 (cos (/ -1/2 K))) 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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (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 (* +nan.0 (/ 1 (cos (/ -1/2 K)))) into (/ +nan.0 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ +nan.0 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of +nan.0 in K
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (/ +nan.0 (cos (/ -1/2 K))) into (/ +nan.0 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ +nan.0 (cos (/ -1/2 K))) into (/ +nan.0 (cos (/ -1/2 K)))
* [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 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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (/ -1/2 K)) J) (+ (* 2 (* (* +nan.0 (/ J (cos (/ -1/2 K)))) (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3)))))
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]taylor:  Taking taylor expansion of (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3)))) in 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]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]taylor:  Taking taylor expansion of (/ (pow J 3) (pow (cos (/ -1/2 K)) 3)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 3) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 3 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 3 (log (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 3 in J
* [misc]backup-simplify:  Simplify 3 into 3
* [misc]taylor:  Taking taylor expansion of (log (cos (/ -1/2 K))) 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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 3 (log (cos (/ -1/2 K)))) into (* 3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 3)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 3)) into (/ 1 (pow (cos (/ -1/2 K)) 3))
* [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]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ (* +nan.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 (+ (* (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 (+ (* +nan.0 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]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 (* (/ +nan.0 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* (/ 1 (- J)) 1))) into (/ +nan.0 (* (cos (* 1/2 K)) J))
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 2)
* [misc]approximate:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) 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 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (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 (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ U (cos (* 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ U (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (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) into (* -2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (* -2 J)) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (* 1 (* -2 (* (cos (* 1/2 K)) J))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (* 1/2 K)) 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 (* (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 (+ (* -2 0) (* 0 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 (* -2 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (* -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 (* (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)) 0) into 0
* [misc]backup-simplify:  Simplify (* -2 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 (+ (* -2 0) (+ (* 0 0) (* 0 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 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)) 0) (+ (* 0 0) (* 0 (* -2 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) 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/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (* -2 (* (cos (* 1/2 K)) J))))) into (- (* 1/8 (/ 1 (* (cos (* 1/2 K)) J))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/8 (/ 1 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/8 (/ 1 (* (cos (* 1/2 K)) J))) 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 (/ 1 (* (cos (* 1/2 K)) J)) in 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)) 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 (+ (* 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)) 1) (* 0 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/8 (/ 1 (cos (* 1/2 K)))) into (/ 1/8 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (- (/ 1/8 (cos (* 1/2 K)))) into (- (* 1/8 (/ 1 (cos (* 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/8 (/ 1 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/8 (/ 1 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of 1/8 in K
* [misc]backup-simplify:  Simplify 1/8 into 1/8
* [misc]taylor:  Taking taylor expansion of (/ 1 (cos (* 1/2 K))) 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/8 1) into 1/8
* [misc]backup-simplify:  Simplify (- 1/8) into -1/8
* [misc]backup-simplify:  Simplify -1/8 into -1/8
* [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 (+ (* 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)) 1) (* 0 0)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (+ (* -2 (cos (* 1/2 K))) (* 0 0)) 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 (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 J)))) 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 (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* -2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) 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]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 0) (* 0 (* -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 (/ (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 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (cos (* 1/2 K))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/8 0) (* 0 (/ 1 (cos (* 1/2 K))))) 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 (/ (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 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 (cos (* 1/2 K))) (* 0 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)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/8 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 (+ (* -2 (* 1 (* J 1))) (* -1/8 (* 1 (* (/ 1 J) (pow U 2))))) into (- (+ (* 2 J) (* 1/8 (/ (pow U 2) J))))
* [misc]approximate:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 1) into 1
* [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 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) 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 (sqrt (sqrt (+ (* 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/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (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 (/ 1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (/ -2 J)) into (* -2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (* 0 (* -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 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (/ 1 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 (+ (* (cos (/ 1/2 K)) 0) (* 0 (/ -2 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* (* +nan.0 (/ J (cos (/ 1/2 K)))) (* -2 (/ (cos (/ 1/2 K)) J)))) into (- +nan.0)
* [misc]taylor:  Taking taylor expansion of (- +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.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 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 (+ (* -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)) 0) (+ (* 0 0) (* 0 (/ -2 J)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ J (cos (/ 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* (* +nan.0 (/ J (cos (/ 1/2 K)))) 0) (* (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (* -2 (/ (cos (/ 1/2 K)) J))))) into (- (* +nan.0 (/ J (cos (/ 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (- +nan.0) into (- +nan.0)
* [misc]taylor:  Taking taylor expansion of (- +nan.0) in K
* [misc]taylor:  Taking taylor expansion of +nan.0 in K
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (- +nan.0) into (- +nan.0)
* [misc]backup-simplify:  Simplify (- +nan.0) into (- +nan.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 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 (+ 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 0) (+ (* 0 0) (* 0 (/ -2 J))))) into 0
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (/ 1/2 K)) J) (+ (* 2 (* (* +nan.0 (/ J (cos (/ 1/2 K)))) (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3)))))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* (* +nan.0 (/ J (cos (/ 1/2 K)))) 0) (+ (* (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 0) (* (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))))) (* -2 (/ (cos (/ 1/2 K)) J)))))) into (- (+ (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (- (* +nan.0 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))))))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (- (* +nan.0 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (- (* +nan.0 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) 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 (cos (/ 1/2 K))) 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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (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]taylor:  Taking taylor expansion of (- (* +nan.0 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) 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 (cos (/ 1/2 K))) 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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (/ (pow (cos (/ 1/2 K)) 2) 1) into (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ 1/2 K)) 2) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* +nan.0 0) (* 0 (pow (cos (/ 1/2 K)) 2))) 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]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]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 (- +nan.0) into (- +nan.0)
* [misc]approximate:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 (sqrt (sqrt (+ 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/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (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 (/ -1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (/ 2 J)) into (* 2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (* 0 (* 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 (- 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) 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 (/ 2 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* (* +nan.0 (/ J (cos (/ -1/2 K)))) (* 2 (/ (cos (/ -1/2 K)) J)))) into (- +nan.0)
* [misc]taylor:  Taking taylor expansion of (- +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.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 (- 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 (+ (* -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)) 0) (+ (* 0 0) (* 0 (/ 2 J)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ J (cos (/ -1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* (* +nan.0 (/ J (cos (/ -1/2 K)))) 0) (* (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) (* 2 (/ (cos (/ -1/2 K)) J))))) into (- (* +nan.0 (/ J (cos (/ -1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (- +nan.0) into (- +nan.0)
* [misc]taylor:  Taking taylor expansion of (- +nan.0) in K
* [misc]taylor:  Taking taylor expansion of +nan.0 in K
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (- +nan.0) into (- +nan.0)
* [misc]backup-simplify:  Simplify (- +nan.0) into (- +nan.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 (- 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 (+ 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 0) (+ (* 0 0) (* 0 (/ 2 J))))) into 0
* [misc]backup-simplify:  Simplify (* 1 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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (/ -1/2 K)) J) (+ (* 2 (* (* +nan.0 (/ J (cos (/ -1/2 K)))) (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3)))))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* (* +nan.0 (/ J (cos (/ -1/2 K)))) 0) (+ (* (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 0) (* (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))))) (* 2 (/ (cos (/ -1/2 K)) J)))))) into (- (+ (* +nan.0 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) (- (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) (- (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) (- (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) 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 (cos (/ -1/2 K))) 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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (/ (pow (cos (/ -1/2 K)) 2) 1) into (pow (cos (/ -1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) 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 (cos (/ -1/2 K))) 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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (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 (+ 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 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ -1/2 K)) 2) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* +nan.0 0) (* 0 (pow (cos (/ -1/2 K)) 2))) into 0
* [misc]backup-simplify:  Simplify (+ 0 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]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 (- +nan.0) into (- +nan.0)
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) 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 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) 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 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))) into (pow (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow U 2) (pow J 2))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (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 (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ U (cos (* 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ U (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (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 (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ U (cos (* 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ U (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ K 2)) (* -2 J)) 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 (* -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 (* (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) into (* -2 J)
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) (* -2 J)) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (* 1 (* -2 (* (cos (* 1/2 K)) J))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (* 1 (* -2 (* (cos (* 1/2 K)) J))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (* 1/2 K)) 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 (* (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 (+ (* -2 0) (* 0 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 (* -2 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (* -2 (* (cos (* 1/2 K)) J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (* -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 (+ (* -2 0) (+ (* 0 0) (* 0 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 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)) 0) (+ (* 0 0) (* 0 (* -2 J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) 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/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (* -2 (* (cos (* 1/2 K)) J))))) into (- (* 1/8 (/ 1 (* (cos (* 1/2 K)) J))))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) 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/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1 (- (* 1/8 (/ 1 (* (cos (* 1/2 K)) J))))) (+ (* 0 0) (* (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (* -2 (* (cos (* 1/2 K)) J))))) into (- (* 1/4 (/ 1 (* (cos (* 1/2 K)) J))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (* 1/2 K)) J))) 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 (/ 1 (* (cos (* 1/2 K)) J)) in 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)) 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 (+ (* 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)) 1) (* 0 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 (* (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)) 0) into 0
* [misc]backup-simplify:  Simplify (* -2 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 (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 J)))) 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 (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* -2 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) 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]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 0) (* 0 (* -2 (* (cos (* 1/2 K)) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) 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]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 (- (* 1/8 (/ 1 (* (cos (* 1/2 K)) J))))) (+ (* (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 0) (* 0 (* -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/4 (/ 1 (cos (* 1/2 K)))) into (/ 1/4 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (- (/ 1/4 (cos (* 1/2 K)))) into (- (* 1/4 (/ 1 (cos (* 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (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 (cos (* 1/2 K))) 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 -1/4 into -1/4
* [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 (+ (* 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)) 1) (* 0 0)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (+ (* -2 (cos (* 1/2 K))) (* 0 0)) 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 (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 J))))) 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 (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* -2 J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 1))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 J)) (* 0 (/ 0 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 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 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 J)) (* 0 (/ 0 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 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 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))))) 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]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -1/128 (* (pow (cos (* 1/2 K)) 4) (pow J 4)))
* [misc]backup-simplify:  Simplify (/ (- (/ -1/128 (* (pow (cos (* 1/2 K)) 4) (pow J 4))) (pow (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -3/512 (* (pow (cos (* 1/2 K)) 4) (pow J 4)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 0) (+ (* 0 0) (* (/ -3/512 (* (pow (cos (* 1/2 K)) 4) (pow J 4))) (* -2 (* (cos (* 1/2 K)) J))))))) into (* 3/256 (/ 1 (* (pow (cos (* 1/2 K)) 3) (pow J 3))))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 1))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 J)) (* 0 (/ 0 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 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 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 J)) (* 0 (/ 0 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 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 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))))) 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]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -1/128 (* (pow (cos (* 1/2 K)) 4) (pow J 4)))
* [misc]backup-simplify:  Simplify (/ (- (/ -1/128 (* (pow (cos (* 1/2 K)) 4) (pow J 4))) (pow (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -3/512 (* (pow (cos (* 1/2 K)) 4) (pow J 4)))
* [misc]backup-simplify:  Simplify (+ (* 1 (* 3/256 (/ 1 (* (pow (cos (* 1/2 K)) 3) (pow J 3))))) (+ (* 0 0) (+ (* (/ 1/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (- (* 1/8 (/ 1 (* (cos (* 1/2 K)) J))))) (+ (* 0 0) (* (/ -3/512 (* (pow (cos (* 1/2 K)) 4) (pow J 4))) (* -2 (* (cos (* 1/2 K)) J))))))) into (* 1/64 (/ 1 (* (pow (cos (* 1/2 K)) 3) (pow J 3))))
* [misc]taylor:  Taking taylor expansion of (* 1/64 (/ 1 (* (pow (cos (* 1/2 K)) 3) (pow J 3)))) in J
* [misc]taylor:  Taking taylor expansion of 1/64 in J
* [misc]backup-simplify:  Simplify 1/64 into 1/64
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (pow (cos (* 1/2 K)) 3) (pow J 3))) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 3) (pow J 3)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 3) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 3 (log (cos (* 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 3 (log (cos (* 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 3 in J
* [misc]backup-simplify:  Simplify 3 into 3
* [misc]taylor:  Taking taylor expansion of (log (cos (* 1/2 K))) 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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 3 (log (cos (* 1/2 K)))) into (* 3 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 3 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 3)
* [misc]taylor:  Taking taylor expansion of (pow J 3) in J
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 3) 1) into (pow (cos (* 1/2 K)) 3)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (* 1/2 K)) 3)) into (/ 1 (pow (cos (* 1/2 K)) 3))
* [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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (* 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 3 0) (* 0 (log (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 3 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 3) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (pow (cos (* 1/2 K)) 3)) (/ 0 (pow (cos (* 1/2 K)) 3))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/64 0) (* 0 (/ 1 (pow (cos (* 1/2 K)) 3)))) 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 (+ (* 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 1) (* 0 0))) 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]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 (+ (* 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 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 (cos (* 1/2 K))) (* 0 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)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 (* 1 (* J 1))) (* -1/4 (* 1 (* (/ 1 J) (pow U 2))))) into (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J))))
* [misc]approximate:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 1) into 1
* [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 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) 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 (sqrt (sqrt (+ (* 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/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (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 (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 1) into 1
* [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 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) 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 (sqrt (sqrt (+ (* 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/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J)))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ 1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 K) 2)) (* -2 (/ 1 J))) 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 (* -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 (* (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 (/ 1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (/ -2 J)) into (* -2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (* 0 (* -2 (/ (cos (/ 1/2 K)) J))) into 0
* [misc]backup-simplify:  Simplify (* 0 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 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 (+ 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 (/ -2 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* (* +nan.0 (/ J (cos (/ 1/2 K)))) (* -2 (/ (cos (/ 1/2 K)) J)))) into (- +nan.0)
* [misc]backup-simplify:  Simplify (+ (* 0 (- +nan.0)) (* (* +nan.0 (/ J (cos (/ 1/2 K)))) 0)) 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 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 (+ (* -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)) 0) (+ (* 0 0) (* 0 (/ -2 J)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ J (cos (/ 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* (* +nan.0 (/ J (cos (/ 1/2 K)))) 0) (* (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (* -2 (/ (cos (/ 1/2 K)) J))))) into (- (* +nan.0 (/ J (cos (/ 1/2 K)))))
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ J (cos (/ 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 0 (- (* +nan.0 (/ J (cos (/ 1/2 K)))))) (+ (* (* +nan.0 (/ J (cos (/ 1/2 K)))) (- +nan.0)) (* (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 0))) into (- (* +nan.0 (/ J (cos (/ 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ J (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ J (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 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 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 (+ 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 0) (+ (* 0 0) (* 0 (/ -2 J))))) into 0
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (/ 1/2 K)) J) (+ (* 2 (* (* +nan.0 (/ J (cos (/ 1/2 K)))) (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3)))))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* (* +nan.0 (/ J (cos (/ 1/2 K)))) 0) (+ (* (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 0) (* (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))))) (* -2 (/ (cos (/ 1/2 K)) J)))))) into (- (+ (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (- (* +nan.0 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))))))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (/ 1/2 K)) J) (+ (* 2 (* (* +nan.0 (/ J (cos (/ 1/2 K)))) (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3)))))
* [misc]backup-simplify:  Simplify (+ (* 0 (- (+ (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (- (* +nan.0 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))))))) (+ (* (* +nan.0 (/ J (cos (/ 1/2 K)))) (- (* +nan.0 (/ J (cos (/ 1/2 K)))))) (+ (* (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (- +nan.0)) (* (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))))) 0)))) into (- (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (pow (cos (/ 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) 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 (cos (/ 1/2 K))) 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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (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]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]approximate:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 (sqrt (sqrt (+ 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/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (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 (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 (sqrt (sqrt (+ 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/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]backup-simplify:  Simplify (sqrt 0) into 0
* [misc]backup-simplify:  Simplify (/ (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (sqrt 0))) into (* +nan.0 (/ J (cos (/ -1/2 K))))
* [misc]taylor:  Taking taylor expansion of (* (cos (/ (/ 1 (- K)) 2)) (* -2 (/ 1 (- J)))) 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 (* -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 (* (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 (/ -1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (/ 2 J)) into (* 2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (* 0 (* 2 (/ (cos (/ -1/2 K)) J))) into 0
* [misc]backup-simplify:  Simplify (* 0 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 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 (+ 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 (/ 2 J))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* (* +nan.0 (/ J (cos (/ -1/2 K)))) (* 2 (/ (cos (/ -1/2 K)) J)))) into (- +nan.0)
* [misc]backup-simplify:  Simplify (+ (* 0 (- +nan.0)) (* (* +nan.0 (/ J (cos (/ -1/2 K)))) 0)) 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 (- 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 (+ (* -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)) 0) (+ (* 0 0) (* 0 (/ 2 J)))) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ J (cos (/ -1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* (* +nan.0 (/ J (cos (/ -1/2 K)))) 0) (* (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) (* 2 (/ (cos (/ -1/2 K)) J))))) into (- (* +nan.0 (/ J (cos (/ -1/2 K)))))
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ J (cos (/ -1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* 0 (- (* +nan.0 (/ J (cos (/ -1/2 K)))))) (+ (* (* +nan.0 (/ J (cos (/ -1/2 K)))) (- +nan.0)) (* (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 0))) into (- (* +nan.0 (/ J (cos (/ -1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ J (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ J (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 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 (- 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 (+ 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 0) (+ (* 0 0) (* 0 (/ 2 J))))) into 0
* [misc]backup-simplify:  Simplify (* 1 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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (/ -1/2 K)) J) (+ (* 2 (* (* +nan.0 (/ J (cos (/ -1/2 K)))) (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3)))))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* (* +nan.0 (/ J (cos (/ -1/2 K)))) 0) (+ (* (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 0) (* (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))))) (* 2 (/ (cos (/ -1/2 K)) J)))))) into (- (+ (* +nan.0 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) (- (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))))
* [misc]backup-simplify:  Simplify (* 1 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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (/ -1/2 K)) J) (+ (* 2 (* (* +nan.0 (/ J (cos (/ -1/2 K)))) (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3)))))
* [misc]backup-simplify:  Simplify (+ (* 0 (- (+ (* +nan.0 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) (- (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))))) (+ (* (* +nan.0 (/ J (cos (/ -1/2 K)))) (- (* +nan.0 (/ J (cos (/ -1/2 K)))))) (+ (* (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) (- +nan.0)) (* (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))))) 0)))) into (- (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (pow (cos (/ -1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) 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 (cos (/ -1/2 K))) 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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (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]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]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (log1p (expm1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 2 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (expm1 (log1p (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 3 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1/2) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 4 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (pow (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 5 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (exp (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 6 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (log (exp (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 7 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 8 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cbrt (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 9 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (27 enodes)
* * [misc]simplify:  iters left: 3 (34 enodes)
* * [misc]simplify:  iters left: 2 (46 enodes)
* * [misc]simplify:  iters left: 1 (47 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 10 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (32 enodes)
* * [misc]simplify:  iters left: 2 (44 enodes)
* * [misc]simplify:  iters left: 1 (45 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 11 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (sqrt 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (sqrt 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 12 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 13 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (fabs (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (24 enodes)
* * [misc]simplify:  iters left: 3 (31 enodes)
* * [misc]simplify:  iters left: 2 (43 enodes)
* * [misc]simplify:  iters left: 1 (44 enodes)
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (fabs (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 14 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* 1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 15 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (log1p (expm1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 16 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (expm1 (log1p (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 17 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1/2) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 18 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (pow (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 19 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (exp (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 20 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (log (exp (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 21 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 22 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (cbrt (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 23 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (* (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (27 enodes)
* * [misc]simplify:  iters left: 3 (34 enodes)
* * [misc]simplify:  iters left: 2 (46 enodes)
* * [misc]simplify:  iters left: 1 (47 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (* (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 24 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (32 enodes)
* * [misc]simplify:  iters left: 2 (44 enodes)
* * [misc]simplify:  iters left: 1 (45 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 25 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (* (sqrt 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (* (sqrt 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 26 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 27 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (fabs (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (24 enodes)
* * [misc]simplify:  iters left: 3 (31 enodes)
* * [misc]simplify:  iters left: 2 (43 enodes)
* * [misc]simplify:  iters left: 1 (44 enodes)
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1 1) to (λ (J K U) (* (fabs (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 28 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (* 1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* * * * [misc]progress:  [ 29 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (log1p (expm1 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 30 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (expm1 (log1p (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 31 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (pow (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) 1)))>
* [enter]simplify:  Simplifying (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (29 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (79 enodes)
* * [misc]simplify:  iters left: 2 (102 enodes)
* * [misc]simplify:  iters left: 1 (103 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (pow (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) 1)))
* * * * [misc]progress:  [ 32 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (pow (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) 1)))>
* [enter]simplify:  Simplifying (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (29 enodes)
* * [misc]simplify:  iters left: 4 (53 enodes)
* * [misc]simplify:  iters left: 3 (79 enodes)
* * [misc]simplify:  iters left: 2 (102 enodes)
* * [misc]simplify:  iters left: 1 (103 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (pow (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) 1)))
* * * * [misc]progress:  [ 33 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (pow (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) 1)))>
* * * * [misc]progress:  [ 34 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (exp (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (+ (log (cos (/ K 2))) (log (* -2 J)))))))>
* [enter]simplify:  Simplifying (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (+ (log (cos (/ K 2))) (log (* -2 J))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (52 enodes)
* * [misc]simplify:  iters left: 3 (81 enodes)
* * [misc]simplify:  iters left: 2 (114 enodes)
* * [misc]simplify:  iters left: 1 (121 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (+ (log (cos (/ K 2))) (log (* -2 J))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (exp (+ (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (+ (log (cos (/ K 2))) (log (* -2 J)))))))
* * * * [misc]progress:  [ 35 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (exp (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (* (cos (/ K 2)) (* -2 J)))))))>
* [enter]simplify:  Simplifying (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (* (cos (/ K 2)) (* -2 J))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (51 enodes)
* * [misc]simplify:  iters left: 3 (86 enodes)
* * [misc]simplify:  iters left: 2 (122 enodes)
* * [misc]simplify:  iters left: 1 (131 enodes)
* [exit]simplify:  Simplified to (+ (log (* (* J -2) (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (exp (+ (log (* (* J -2) (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))))
* * * * [misc]progress:  [ 36 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (exp (log (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 37 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (log (exp (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 38 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* -2 J) (* -2 J)) (* -2 J)))))))>
* [enter]simplify:  Simplifying (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* -2 J) (* -2 J)) (* -2 J))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (48 enodes)
* * [misc]simplify:  iters left: 4 (151 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* -2 J) 3))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (* (* (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* -2 J) 3))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 39 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (cos (/ K 2)) (* -2 J)) (* (cos (/ K 2)) (* -2 J))) (* (cos (/ K 2)) (* -2 J)))))))>
* [enter]simplify:  Simplifying (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (cos (/ K 2)) (* -2 J)) (* (cos (/ K 2)) (* -2 J))) (* (cos (/ K 2)) (* -2 J))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (43 enodes)
* * [misc]simplify:  iters left: 4 (128 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (pow (* (* -2 J) (cos (/ K 2))) 3) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (pow (* (* -2 J) (cos (/ K 2))) 3) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 40 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cbrt (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))) (cbrt (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 41 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 42 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) (sqrt (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 43 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* 1 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 44 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J))))>
* [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) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2))) (* -2 J))))
* * * * [misc]progress:  [ 45 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (26 enodes)
* * [misc]simplify:  iters left: 3 (33 enodes)
* * [misc]simplify:  iters left: 2 (45 enodes)
* * [misc]simplify:  iters left: 1 (46 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))))
* * * * [misc]progress:  [ 46 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (27 enodes)
* * [misc]simplify:  iters left: 3 (34 enodes)
* * [misc]simplify:  iters left: 2 (46 enodes)
* * [misc]simplify:  iters left: 1 (47 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))))
* * * * [misc]progress:  [ 47 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (32 enodes)
* * [misc]simplify:  iters left: 2 (44 enodes)
* * [misc]simplify:  iters left: 1 (45 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))))
* * * * [misc]progress:  [ 48 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt 1) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt 1) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))
* * * * [misc]progress:  [ 49 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (32 enodes)
* * [misc]simplify:  iters left: 2 (44 enodes)
* * [misc]simplify:  iters left: 1 (45 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))))
* * * * [misc]progress:  [ 50 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* 1 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 51 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (* -2 J)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* * * * [misc]progress:  [ 52 / 89 ] simplifiying candidate #<alt (λ (J K U) (log1p (expm1 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 53 / 89 ] simplifiying candidate #<alt (λ (J K U) (expm1 (log1p (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 54 / 89 ] simplifiying candidate #<alt (λ (J K U) (pow (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) 1))>
* [enter]simplify:  Simplifying (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (67 enodes)
* * [misc]simplify:  iters left: 3 (120 enodes)
* * [misc]simplify:  iters left: 2 (193 enodes)
* * [misc]simplify:  iters left: 1 (209 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 1))
* * * * [misc]progress:  [ 55 / 89 ] simplifiying candidate #<alt (λ (J K U) (pow (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) 1))>
* [enter]simplify:  Simplifying (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (67 enodes)
* * [misc]simplify:  iters left: 3 (120 enodes)
* * [misc]simplify:  iters left: 2 (193 enodes)
* * [misc]simplify:  iters left: 1 (209 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 1))
* * * * [misc]progress:  [ 56 / 89 ] simplifiying candidate #<alt (λ (J K U) (pow (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) 1))>
* [enter]simplify:  Simplifying (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (67 enodes)
* * [misc]simplify:  iters left: 3 (120 enodes)
* * [misc]simplify:  iters left: 2 (193 enodes)
* * [misc]simplify:  iters left: 1 (209 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 1))
* * * * [misc]progress:  [ 57 / 89 ] simplifiying candidate #<alt (λ (J K U) (pow (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) 1))>
* * * * [misc]progress:  [ 58 / 89 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (+ (log (cos (/ K 2))) (log (* -2 J)))))))>
* [enter]simplify:  Simplifying (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (+ (log (cos (/ K 2))) (log (* -2 J)))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (64 enodes)
* * [misc]simplify:  iters left: 3 (119 enodes)
* * [misc]simplify:  iters left: 2 (201 enodes)
* * [misc]simplify:  iters left: 1 (234 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (+ (log (cos (/ K 2))) (log (* -2 J))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (+ (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (+ (log (cos (/ K 2))) (log (* -2 J))))))
* * * * [misc]progress:  [ 59 / 89 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (* (cos (/ K 2)) (* -2 J)))))))>
* [enter]simplify:  Simplifying (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (* (cos (/ K 2)) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (58 enodes)
* * [misc]simplify:  iters left: 3 (102 enodes)
* * [misc]simplify:  iters left: 2 (181 enodes)
* * [misc]simplify:  iters left: 1 (229 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (+ (log (* (* J -2) (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (+ (log (* (* J -2) (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))))
* * * * [misc]progress:  [ 60 / 89 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* [enter]simplify:  Simplifying (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (35 enodes)
* * [misc]simplify:  iters left: 4 (70 enodes)
* * [misc]simplify:  iters left: 3 (136 enodes)
* * [misc]simplify:  iters left: 2 (232 enodes)
* * [misc]simplify:  iters left: 1 (273 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (log (* (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (* J -2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (log (* (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (* J -2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 61 / 89 ] simplifiying candidate #<alt (λ (J K U) (exp (log (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 62 / 89 ] simplifiying candidate #<alt (λ (J K U) (log (exp (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 63 / 89 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* -2 J) (* -2 J)) (* -2 J)))))))>
* [enter]simplify:  Simplifying (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))) (* (* (* -2 J) (* -2 J)) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (191 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* -2 J) 3))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* -2 J) 3))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 64 / 89 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (cos (/ K 2)) (* -2 J)) (* (cos (/ K 2)) (* -2 J))) (* (cos (/ K 2)) (* -2 J)))))))>
* [enter]simplify:  Simplifying (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (cos (/ K 2)) (* -2 J)) (* (cos (/ K 2)) (* -2 J))) (* (cos (/ K 2)) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (49 enodes)
* * [misc]simplify:  iters left: 4 (166 enodes)
* [exit]simplify:  Simplified to (* (* (pow (* (* -2 J) (cos (/ K 2))) 3) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (pow (* (* -2 J) (cos (/ K 2))) 3) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 65 / 89 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* [enter]simplify:  Simplifying (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (149 enodes)
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 66 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (* (cbrt (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))) (cbrt (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))) (cbrt (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 67 / 89 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 68 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))) (sqrt (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))))>
* * * * [misc]progress:  [ 69 / 89 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 70 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))>
* [enter]simplify:  Simplifying (* (cos (/ K 2)) (* -2 J))
* * [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 2) to (λ (J K U) (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cos (/ K 2)) (* -2 J))))
* * * * [misc]progress:  [ 71 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (26 enodes)
* * [misc]simplify:  iters left: 3 (33 enodes)
* * [misc]simplify:  iters left: 2 (45 enodes)
* * [misc]simplify:  iters left: 1 (46 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (* (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))
* * * * [misc]progress:  [ 72 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (27 enodes)
* * [misc]simplify:  iters left: 3 (34 enodes)
* * [misc]simplify:  iters left: 2 (46 enodes)
* * [misc]simplify:  iters left: 1 (47 enodes)
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))
* * * * [misc]progress:  [ 73 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (32 enodes)
* * [misc]simplify:  iters left: 2 (44 enodes)
* * [misc]simplify:  iters left: 1 (45 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))
* * * * [misc]progress:  [ 74 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt 1) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (sqrt 1) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))
* * * * [misc]progress:  [ 75 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))>
* [enter]simplify:  Simplifying (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (32 enodes)
* * [misc]simplify:  iters left: 2 (44 enodes)
* * [misc]simplify:  iters left: 1 (45 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))
* * * * [misc]progress:  [ 76 / 89 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))))))>
* * * * [misc]progress:  [ 77 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 78 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* 1 (* (cos (/ K 2)) (* -2 J)))))>
* [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) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* 1 (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 79 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (/ +nan.0 (* (cos (* 1/2 K)) J)) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (/ +nan.0 (* (cos (* 1/2 K)) J))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* +nan.0 (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 80 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (/ +nan.0 (* (cos (* 1/2 K)) J)) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (/ +nan.0 (* (cos (* 1/2 K)) J))
* [misc]simplify:  Simplified (2 2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* +nan.0 (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 81 / 89 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying 1
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 1
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* 1 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 82 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (/ +nan.0 (* (cos (* 1/2 K)) J)) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (/ +nan.0 (* (cos (* 1/2 K)) J))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* +nan.0 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 83 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (/ +nan.0 (* (cos (* 1/2 K)) J)) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))>
* [enter]simplify:  Simplifying (/ +nan.0 (* (cos (* 1/2 K)) J))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* +nan.0 (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))
* * * * [misc]progress:  [ 84 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (- (+ (* 2 J) (* 1/8 (/ (pow U 2) J))))))>
* [enter]simplify:  Simplifying (- (+ (* 2 J) (* 1/8 (/ (pow U 2) J))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (47 enodes)
* * [misc]simplify:  iters left: 3 (80 enodes)
* * [misc]simplify:  iters left: 2 (117 enodes)
* * [misc]simplify:  iters left: 1 (158 enodes)
* [exit]simplify:  Simplified to (- (* (- J) 2) (/ (* 1/8 U) (/ J U)))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (- (* (- J) 2) (/ (* 1/8 U) (/ J U)))))
* * * * [misc]progress:  [ 85 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (- +nan.0)))>
* [enter]simplify:  Simplifying (- +nan.0)
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) +nan.0))
* * * * [misc]progress:  [ 86 / 89 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (- +nan.0)))>
* [enter]simplify:  Simplifying (- +nan.0)
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) +nan.0))
* * * * [misc]progress:  [ 87 / 89 ] simplifiying candidate #<alt (λ (J K U) (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J)))))>
* [enter]simplify:  Simplifying (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (47 enodes)
* * [misc]simplify:  iters left: 3 (80 enodes)
* * [misc]simplify:  iters left: 2 (117 enodes)
* * [misc]simplify:  iters left: 1 (158 enodes)
* [exit]simplify:  Simplified to (- (* (- J) 2) (/ (* 1/4 U) (/ J U)))
* [misc]simplify:  Simplified (2) to (λ (J K U) (- (* (- J) 2) (/ (* 1/4 U) (/ J U))))
* * * * [misc]progress:  [ 88 / 89 ] 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:  [ 89 / 89 ] 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:  adding candidates to table
* * [misc]progress:  iteration 4 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 2 2 1)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 2 1 2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 2 1 1)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]backup-simplify:  Simplify (/ (* 1/2 U) 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (* 1/2 (/ U J)) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 (/ U J)) (/ 0 1)))) 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 (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))) in K
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (- 1/8)) 1)) (pow 1 1)))) 2) into -1/8
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/8) (+ (* 0 0) (* 0 0))) into -1/24
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (- 1/8)) 1)) (pow 1 1)))) 2) into -1/8
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/8) (+ (* 0 0) (* 0 0))) into -1/24
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ K 2))) (* -2 J)) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (- 1/8)) 1)) (pow 1 1)))) 2) into -1/8
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/8) (+ (* 0 0) (* 0 0))) into -1/24
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [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 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ U 2) into (* 1/2 U)
* [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/2 U) 1) 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 (sqrt (* 1/4 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) into (* 1/2 (/ U (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 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 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 (/ U (cos (* 1/2 K)))) (/ 0 (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 (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))) in J
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in J
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (* 1/2 K)))) into (* 1/3 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in J
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (* 1/2 K)))) into (* 1/3 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ K 2))) (* -2 J)) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in J
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (* 1/2 K)))) into (* 1/3 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 1/3)
* [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 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))) in U
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (* 1/2 K)))) into (* 1/3 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (* 1/2 K)))) into (* 1/3 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ K 2))) (* -2 J)) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (* 1/2 K)))) into (* 1/3 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 1/3)
* [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 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 1) (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1 1) 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 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))) in U
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (* 1/2 K)))) into (* 1/3 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (* 1/2 K)))) into (* 1/3 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ K 2))) (* -2 J)) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]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 (log (cos (* 1/2 K))) into (log (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (* 1/2 K)))) into (* 1/3 (log (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (* 1/2 K))))) into (pow (cos (* 1/2 K)) 1/3)
* [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 (* (pow (cos (* 1/2 K)) 1/3) (pow (cos (* 1/2 K)) 1/3)) into (pow (pow (cos (* 1/2 K)) 2) 1/3)
* [misc]backup-simplify:  Simplify (* -2 J) into (* -2 J)
* [misc]backup-simplify:  Simplify (* (pow (cos (* 1/2 K)) 1/3) (* -2 J)) into (* -2 (* (pow (cos (* 1/2 K)) 1/3) J))
* [misc]backup-simplify:  Simplify (* (pow (pow (cos (* 1/2 K)) 2) 1/3) (* -2 (* (pow (cos (* 1/2 K)) 1/3) J))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]backup-simplify:  Simplify (* 1 (* -2 (* (cos (* 1/2 K)) J))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]taylor:  Taking taylor expansion of (* -2 (* (cos (* 1/2 K)) 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 (* (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 (+ (* -2 0) (* 0 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (* 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 1/3) 0) (* 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 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 (/ (* (pow (* 1 0) 1)) (pow (cos (* 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (* 1/2 K))))) (+ (* (/ (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 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 (/ (* (pow (* 1 0) 1)) (pow (cos (* 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 1/3) 0) (* 0 (pow (cos (* 1/2 K)) 1/3))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (pow (cos (* 1/2 K)) 2) 1/3) 0) (* 0 (* -2 (* (pow (cos (* 1/2 K)) 1/3) J)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 (* -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 (* (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)) 0) into 0
* [misc]backup-simplify:  Simplify (* -2 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 (+ (* -2 0) (+ (* 0 0) (* 0 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 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 (/ (* (pow (* 1 0) 2)) (pow (cos (* 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (* 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 1/3) 0) (+ (* 0 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 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 (/ (* (pow (* 1 0) 2)) (pow (cos (* 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (* 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (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 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 (/ (* (pow (* 1 0) 2)) (pow (cos (* 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (* 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 1/3) 0) (+ (* 0 0) (* 0 (pow (cos (* 1/2 K)) 1/3)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (pow (cos (* 1/2 K)) 2) 1/3) 0) (+ (* 0 0) (* 0 (* -2 (* (pow (cos (* 1/2 K)) 1/3) J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) 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 0) (+ (* 0 0) (* (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (* -2 (* (cos (* 1/2 K)) J))))) into (- (* 1/4 (/ 1 (* (cos (* 1/2 K)) J))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (cos (* 1/2 K)) J)))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (* 1/2 K)) J))) 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 (/ 1 (* (cos (* 1/2 K)) J)) in 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)) 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 (+ (* 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)) 1) (* 0 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/4 (/ 1 (cos (* 1/2 K)))) into (/ 1/4 (cos (* 1/2 K)))
* [misc]backup-simplify:  Simplify (- (/ 1/4 (cos (* 1/2 K)))) into (- (* 1/4 (/ 1 (cos (* 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (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 (cos (* 1/2 K))) 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 -1/4 into -1/4
* [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 (+ (* 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)) 1) (* 0 0)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (+ (* -2 (cos (* 1/2 K))) (* 0 0)) 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 (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 J)))) 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 (/ (* (pow (* 1 0) 3)) (pow (cos (* 1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (* 1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (* 1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 1/3) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* -2 J))))) 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 (/ (* (pow (* 1 0) 3)) (pow (cos (* 1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (* 1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (* 1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 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 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 (/ (* (pow (* 1 0) 3)) (pow (cos (* 1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (* 1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (* 1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (* 1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (* 1/2 K)) 1/3) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (pow (cos (* 1/2 K)) 1/3))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (pow (cos (* 1/2 K)) 2) 1/3) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* -2 (* (pow (cos (* 1/2 K)) 1/3) J)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 J) (+ (* (/ 1/2 J) (/ 0 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 (- (/ 0 (cos (* 1/2 K))) (+ (* (/ 1/2 (* (cos (* 1/2 K)) J)) (/ 0 (cos (* 1/2 K)))))) 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]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* (/ 1/8 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 0) (* 0 (* -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 (/ (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 1) (* 0 0))) 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]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 (+ (* 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 1) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 (cos (* 1/2 K))) (* 0 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)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 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 (+ (* -2 (* 1 (* J 1))) (* -1/4 (* 1 (* (/ 1 J) (pow U 2))))) into (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J))))
* [misc]approximate:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (* (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (* (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) (/ 1 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 1) into 1
* [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 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (* U (cos (/ 1/2 K))))) (/ 0 (cos (/ 1/2 K)))))) 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 (* (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J)))) in K
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [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 (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (* (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 U) 2) into (/ 1/2 U)
* [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 (/ (/ 1/2 U) 1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J)))) in J
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [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 (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (* (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J)))) in U
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [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 (* (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) (* (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))) (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/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 (/ 1/2 (/ 1 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 (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 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J)))) in U
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 K) 2))) (cbrt (cos (/ (/ 1 K) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 K) 2))) (* -2 (/ 1 J))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [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 (* (pow (cos (/ 1/2 K)) 1/3) (pow (cos (/ 1/2 K)) 1/3)) into (pow (pow (cos (/ 1/2 K)) 2) 1/3)
* [misc]backup-simplify:  Simplify (* -2 (/ 1 J)) into (/ -2 J)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ 1/2 K)) 1/3) (/ -2 J)) into (* -2 (* (/ 1 J) (pow (cos (/ 1/2 K)) 1/3)))
* [misc]backup-simplify:  Simplify (* (pow (pow (cos (/ 1/2 K)) 2) 1/3) (* -2 (* (/ 1 J) (pow (cos (/ 1/2 K)) 1/3)))) into (* -2 (/ (cos (/ 1/2 K)) J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ 1/2 K)))) (* -2 (/ (cos (/ 1/2 K)) J))) into -1
* [misc]taylor:  Taking taylor expansion of -1 in J
* [misc]backup-simplify:  Simplify -1 into -1
* [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) 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 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ 1/2 K)) 1/3) 0) (* 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (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 (- (+ (* (/ 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 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ 1/2 K)) 1/3) 0) (* 0 (pow (cos (/ 1/2 K)) 1/3))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (pow (cos (/ 1/2 K)) 2) 1/3) 0) (* 0 (* -2 (* (/ 1 J) (pow (cos (/ 1/2 K)) 1/3))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (* 0 (* -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 -1 in K
* [misc]backup-simplify:  Simplify -1 into -1
* [misc]backup-simplify:  Simplify -1 into -1
* [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 (+ (* -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 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ 1/2 K)) 1/3) 0) (+ (* 0 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (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 (- (+ (* (/ 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 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ 1/2 K)) 1/3) 0) (+ (* 0 0) (* 0 (pow (cos (/ 1/2 K)) 1/3)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (pow (cos (/ 1/2 K)) 2) 1/3) 0) (+ (* 0 0) (* 0 (* -2 (* (/ 1 J) (pow (cos (/ 1/2 K)) 1/3)))))) into 0
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ 1/2 K)))))) into (/ (cos (/ 1/2 K)) J)
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (* (/ (cos (/ 1/2 K)) J) (* -2 (/ (cos (/ 1/2 K)) J))))) into (- (* 2 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (/ (pow (cos (/ 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [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 (exp (* 2 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ 1/2 K)))) 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 (cos (/ 1/2 K))) 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 (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ 1/2 K)))) into (* 2 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (/ (pow (cos (/ 1/2 K)) 2) 1) into (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ 1/2 K)) 2) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (pow (cos (/ 1/2 K)) 2))) 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]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 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 (+ 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 (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ 1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ 1/2 K)) 1/3) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ -2 J))))) 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 (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ 1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 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 (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ 1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ 1/2 K)) 1/3) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (pow (cos (/ 1/2 K)) 1/3))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (pow (cos (/ 1/2 K)) 2) 1/3) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* -2 (* (/ 1 J) (pow (cos (/ 1/2 K)) 1/3))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) 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 (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 J) (/ 0 J)) (* 0 (/ 0 J)) (* 0 (/ 0 J)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (/ 1 J)) (+ (* (* 1/2 J) (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))) (* 0 (/ 0 (/ 1 J))))) 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 (- (/ 0 (cos (/ 1/2 K))) (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 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 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]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ 1/2 K)))) 0) (+ (* 0 0) (+ (* (/ (cos (/ 1/2 K)) J) 0) (* 0 (* -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 (/ (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 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 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 (+ (* 2 0) (+ (* 0 0) (* 0 (pow (cos (/ 1/2 K)) 2)))) 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 (* 1 (* 1 (/ 1 (/ 1 U))))) into (* -1 U)
* [misc]approximate:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (* (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (* (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))))) in K
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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)) 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 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) (/ -1 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 1) into 1
* [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 (+ (* 1 0) (* 0 1)) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 2) (+ (* (/ -1/2 U) (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 (/ J U)) (/ 0 (/ -1 J))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (* (cos (/ -1/2 K)) U))) (/ 0 (cos (/ -1/2 K)))))) 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 (* (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J))))) in K
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))) in K
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [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 (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (* (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))))) in J
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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)) 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 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 U) 2) into (/ -1/2 U)
* [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 (/ (/ -1/2 U) -1) 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 1) into 1
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J))))) in J
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))) in J
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [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 (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (* (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J))))) in U
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [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 (* (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) (* (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))))) in U
* [misc]taylor:  Taking taylor expansion of (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Rewrote expression to (sqrt (+ (* 1 1) (* (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))) (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))
* [misc]taylor:  Taking taylor expansion of (+ (* 1 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) 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 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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)) 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 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/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 (/ -1/2 (/ -1 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 (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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 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 (/ 0 (* 2 (sqrt (* 1/4 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J))))) in U
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 (- K)) 2))) (cbrt (cos (/ (/ 1 (- K)) 2)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (* (cbrt (cos (/ (/ 1 (- K)) 2))) (* -2 (/ 1 (- J)))) in U
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [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 (* (pow (cos (/ -1/2 K)) 1/3) (pow (cos (/ -1/2 K)) 1/3)) into (pow (pow (cos (/ -1/2 K)) 2) 1/3)
* [misc]backup-simplify:  Simplify (* -2 (/ -1 J)) into (/ 2 J)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ -1/2 K)) 1/3) (/ 2 J)) into (* 2 (* (pow (cos (/ -1/2 K)) 1/3) (/ 1 J)))
* [misc]backup-simplify:  Simplify (* (pow (pow (cos (/ -1/2 K)) 2) 1/3) (* 2 (* (pow (cos (/ -1/2 K)) 1/3) (/ 1 J)))) into (* 2 (/ (cos (/ -1/2 K)) J))
* [misc]backup-simplify:  Simplify (* (* 1/2 (/ J (cos (/ -1/2 K)))) (* 2 (/ (cos (/ -1/2 K)) J))) into 1
* [misc]taylor:  Taking taylor expansion of 1 in J
* [misc]backup-simplify:  Simplify 1 into 1
* [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) 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 1/3) 0) (* 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (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) 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 1/3) 0) (* 0 (pow (cos (/ -1/2 K)) 1/3))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (pow (cos (/ -1/2 K)) 2) 1/3) 0) (* 0 (* 2 (* (pow (cos (/ -1/2 K)) 1/3) (/ 1 J))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (* 0 (* 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 1 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [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 (+ (* -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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 1/3) 0) (+ (* 0 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (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) 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 (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 1/3) 0) (+ (* 0 0) (* 0 (pow (cos (/ -1/2 K)) 1/3)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (pow (cos (/ -1/2 K)) 2) 1/3) 0) (+ (* 0 0) (* 0 (* 2 (* (pow (cos (/ -1/2 K)) 1/3) (/ 1 J)))))) into 0
* [misc]backup-simplify:  Simplify (* 1 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)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 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 0 2) (+)) (* 2 (* 1/2 (/ J (cos (/ -1/2 K)))))) into (/ (cos (/ -1/2 K)) J)
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (* (/ (cos (/ -1/2 K)) J) (* 2 (/ (cos (/ -1/2 K)) J))))) into (* 2 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2)))
* [misc]taylor:  Taking taylor expansion of (* 2 (/ (pow (cos (/ -1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [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 (exp (* 2 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (cos (/ -1/2 K)))) 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 (cos (/ -1/2 K))) 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 (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (log (cos (/ -1/2 K)))) into (* 2 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 2)
* [misc]taylor:  Taking taylor expansion of (pow J 2) in J
* [misc]backup-simplify:  Simplify (/ (pow (cos (/ -1/2 K)) 2) 1) into (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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (pow (cos (/ -1/2 K)) 2) (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 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 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 (+ 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 (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ -1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 1/3) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (/ 2 J))))) 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 (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ -1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 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 (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ -1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ -1/2 K)) 1/3) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (pow (cos (/ -1/2 K)) 1/3))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (pow (cos (/ -1/2 K)) 2) 1/3) 0) (+ (* 0 0) (+ (* 0 0) (* 0 (* 2 (* (pow (cos (/ -1/2 K)) 1/3) (/ 1 J))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 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 (- (/ 0 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) 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 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 (- 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 2) (+ (* -1/2 (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) 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 (- (/ 0 (/ -1 J)) (+ (* (* 1/2 J) (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))) (* 0 (/ 0 (/ -1 J))))) 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 (cos (/ -1/2 K))) (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 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]backup-simplify:  Simplify (+ (* (* 1/2 (/ J (cos (/ -1/2 K)))) 0) (+ (* 0 0) (+ (* (/ (cos (/ -1/2 K)) J) 0) (* 0 (* 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 (/ (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 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 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 (+ (* 2 0) (+ (* 0 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 (* 1 (* 1 (/ 1 (/ 1 (- U)))))) into (* -1 U)
* * * * [misc]progress:  [ 2 / 4 ] generating series at (2 2 2 1)
* [misc]approximate:  Taking taylor expansion of (cbrt (cos (/ K 2))) in (K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (- 1/8)) 1)) (pow 1 1)))) 2) into -1/8
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/8) (+ (* 0 0) (* 0 0))) into -1/24
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (- 1/8)) 1)) (pow 1 1)))) 2) into -1/8
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/8) (+ (* 0 0) (* 0 0))) into -1/24
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 2) 2)) (* (/ (pow -1/24 1) 1)))) into -1/24
* [misc]backup-simplify:  Simplify -1/24 into -1/24
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 1/2 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow 1 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 (- 1/8)) 1)) (pow 1 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow 1 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 -1/8) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow -1/24 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 1/2 4) 24)) 0 (* -1 (/ (pow 1/2 1) 1) (/ (pow 0 1) 1)) (* -1 (/ (pow 0 2) 2)) 0) into 1/384
* [misc]backup-simplify:  Simplify (/ (+ (* -6 (/ (* (pow (* 1 0) 4)) (pow 1 4))) (* 12 (/ (* (pow (* 1 0) 2) (pow (* 2 (- 1/8)) 1)) (pow 1 3))) (* -3 (/ (* 1 (pow (* 2 (- 1/8)) 2)) (pow 1 2))) (* -4 (/ (* (pow (* 1 0) 1) 1 (pow (* 6 0) 1)) (pow 1 2))) (* 1 (/ (* 1 1 1 (pow (* 24 1/384) 1)) (pow 1 1)))) 24) into -1/192
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/192) (+ (* 0 0) (+ (* 0 -1/8) (+ (* 0 0) (* 0 0))))) into -1/576
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 4) 24)) (* (/ (pow 0 2) 2) (/ (pow -1/24 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow -1/24 2) 2)) (* (/ (pow -1/576 1) 1)))) into -1/1152
* [misc]backup-simplify:  Simplify -1/1152 into -1/1152
* [misc]backup-simplify:  Simplify (+ (* -1/1152 (pow K 4)) (+ (* -1/24 (pow K 2)) 1)) into (- 1 (+ (* 1/1152 (pow K 4)) (* 1/24 (pow K 2))))
* [misc]approximate:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in (K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (pow (cos (/ 1/2 K)) 1/3) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ 1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -6 (/ (* (pow (* 1 0) 4)) (pow (cos (/ 1/2 K)) 4))) (* 12 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* -3 (/ (* 1 (pow (* 2 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* -4 (/ (* (pow (* 1 0) 1) 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 24) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 4) 24)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 24 (/ (* (pow (* 1 0) 5)) (pow (cos (/ 1/2 K)) 5))) (* -60 (/ (* (pow (* 1 0) 3) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 4))) (* 30 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 2)) (pow (cos (/ 1/2 K)) 3))) (* 20 (/ (* (pow (* 1 0) 2) 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* -10 (/ (* 1 (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* -5 (/ (* (pow (* 1 0) 1) 1 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 120) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 5) 120)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -120 (/ (* (pow (* 1 0) 6)) (pow (cos (/ 1/2 K)) 6))) (* 360 (/ (* (pow (* 1 0) 4) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 5))) (* -270 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 2)) (pow (cos (/ 1/2 K)) 4))) (* -120 (/ (* (pow (* 1 0) 3) 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 4))) (* 30 (/ (* 1 (pow (* 2 0) 3)) (pow (cos (/ 1/2 K)) 3))) (* 120 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* 30 (/ (* (pow (* 1 0) 2) 1 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* -10 (/ (* 1 1 (pow (* 6 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* -15 (/ (* 1 (pow (* 2 0) 1) 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* -6 (/ (* (pow (* 1 0) 1) 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 1 (pow (* 720 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 720) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 6) 720)) (* (/ (pow 0 4) 24) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 2) 2)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (cos (/ 1/2 (/ 1 K))) 1/3) into (pow (cos (* 1/2 K)) 1/3)
* [misc]approximate:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in (K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (pow (cos (/ -1/2 K)) 1/3) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ -1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -6 (/ (* (pow (* 1 0) 4)) (pow (cos (/ -1/2 K)) 4))) (* 12 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* -3 (/ (* 1 (pow (* 2 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* -4 (/ (* (pow (* 1 0) 1) 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 24) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 4) 24)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 24 (/ (* (pow (* 1 0) 5)) (pow (cos (/ -1/2 K)) 5))) (* -60 (/ (* (pow (* 1 0) 3) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 4))) (* 30 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 2)) (pow (cos (/ -1/2 K)) 3))) (* 20 (/ (* (pow (* 1 0) 2) 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* -10 (/ (* 1 (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* -5 (/ (* (pow (* 1 0) 1) 1 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 120) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 5) 120)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -120 (/ (* (pow (* 1 0) 6)) (pow (cos (/ -1/2 K)) 6))) (* 360 (/ (* (pow (* 1 0) 4) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 5))) (* -270 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 2)) (pow (cos (/ -1/2 K)) 4))) (* -120 (/ (* (pow (* 1 0) 3) 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 4))) (* 30 (/ (* 1 (pow (* 2 0) 3)) (pow (cos (/ -1/2 K)) 3))) (* 120 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* 30 (/ (* (pow (* 1 0) 2) 1 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* -10 (/ (* 1 1 (pow (* 6 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* -15 (/ (* 1 (pow (* 2 0) 1) 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* -6 (/ (* (pow (* 1 0) 1) 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 1 (pow (* 720 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 720) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 6) 720)) (* (/ (pow 0 4) 24) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 2) 2)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (cos (/ -1/2 (/ 1 (- K)))) 1/3) into (pow (cos (* 1/2 K)) 1/3)
* * * * [misc]progress:  [ 3 / 4 ] generating series at (2 2 1 2)
* [misc]approximate:  Taking taylor expansion of (cbrt (cos (/ K 2))) in (K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (- 1/8)) 1)) (pow 1 1)))) 2) into -1/8
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/8) (+ (* 0 0) (* 0 0))) into -1/24
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (- 1/8)) 1)) (pow 1 1)))) 2) into -1/8
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/8) (+ (* 0 0) (* 0 0))) into -1/24
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 2) 2)) (* (/ (pow -1/24 1) 1)))) into -1/24
* [misc]backup-simplify:  Simplify -1/24 into -1/24
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 1/2 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow 1 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 (- 1/8)) 1)) (pow 1 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow 1 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 -1/8) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow -1/24 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 1/2 4) 24)) 0 (* -1 (/ (pow 1/2 1) 1) (/ (pow 0 1) 1)) (* -1 (/ (pow 0 2) 2)) 0) into 1/384
* [misc]backup-simplify:  Simplify (/ (+ (* -6 (/ (* (pow (* 1 0) 4)) (pow 1 4))) (* 12 (/ (* (pow (* 1 0) 2) (pow (* 2 (- 1/8)) 1)) (pow 1 3))) (* -3 (/ (* 1 (pow (* 2 (- 1/8)) 2)) (pow 1 2))) (* -4 (/ (* (pow (* 1 0) 1) 1 (pow (* 6 0) 1)) (pow 1 2))) (* 1 (/ (* 1 1 1 (pow (* 24 1/384) 1)) (pow 1 1)))) 24) into -1/192
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/192) (+ (* 0 0) (+ (* 0 -1/8) (+ (* 0 0) (* 0 0))))) into -1/576
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 4) 24)) (* (/ (pow 0 2) 2) (/ (pow -1/24 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow -1/24 2) 2)) (* (/ (pow -1/576 1) 1)))) into -1/1152
* [misc]backup-simplify:  Simplify -1/1152 into -1/1152
* [misc]backup-simplify:  Simplify (+ (* -1/1152 (pow K 4)) (+ (* -1/24 (pow K 2)) 1)) into (- 1 (+ (* 1/1152 (pow K 4)) (* 1/24 (pow K 2))))
* [misc]approximate:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in (K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (pow (cos (/ 1/2 K)) 1/3) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ 1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -6 (/ (* (pow (* 1 0) 4)) (pow (cos (/ 1/2 K)) 4))) (* 12 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* -3 (/ (* 1 (pow (* 2 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* -4 (/ (* (pow (* 1 0) 1) 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 24) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 4) 24)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 24 (/ (* (pow (* 1 0) 5)) (pow (cos (/ 1/2 K)) 5))) (* -60 (/ (* (pow (* 1 0) 3) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 4))) (* 30 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 2)) (pow (cos (/ 1/2 K)) 3))) (* 20 (/ (* (pow (* 1 0) 2) 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* -10 (/ (* 1 (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* -5 (/ (* (pow (* 1 0) 1) 1 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 120) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 5) 120)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -120 (/ (* (pow (* 1 0) 6)) (pow (cos (/ 1/2 K)) 6))) (* 360 (/ (* (pow (* 1 0) 4) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 5))) (* -270 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 2)) (pow (cos (/ 1/2 K)) 4))) (* -120 (/ (* (pow (* 1 0) 3) 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 4))) (* 30 (/ (* 1 (pow (* 2 0) 3)) (pow (cos (/ 1/2 K)) 3))) (* 120 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* 30 (/ (* (pow (* 1 0) 2) 1 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* -10 (/ (* 1 1 (pow (* 6 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* -15 (/ (* 1 (pow (* 2 0) 1) 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* -6 (/ (* (pow (* 1 0) 1) 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 1 (pow (* 720 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 720) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 6) 720)) (* (/ (pow 0 4) 24) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 2) 2)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (cos (/ 1/2 (/ 1 K))) 1/3) into (pow (cos (* 1/2 K)) 1/3)
* [misc]approximate:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in (K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (pow (cos (/ -1/2 K)) 1/3) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ -1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -6 (/ (* (pow (* 1 0) 4)) (pow (cos (/ -1/2 K)) 4))) (* 12 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* -3 (/ (* 1 (pow (* 2 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* -4 (/ (* (pow (* 1 0) 1) 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 24) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 4) 24)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 24 (/ (* (pow (* 1 0) 5)) (pow (cos (/ -1/2 K)) 5))) (* -60 (/ (* (pow (* 1 0) 3) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 4))) (* 30 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 2)) (pow (cos (/ -1/2 K)) 3))) (* 20 (/ (* (pow (* 1 0) 2) 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* -10 (/ (* 1 (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* -5 (/ (* (pow (* 1 0) 1) 1 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 120) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 5) 120)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -120 (/ (* (pow (* 1 0) 6)) (pow (cos (/ -1/2 K)) 6))) (* 360 (/ (* (pow (* 1 0) 4) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 5))) (* -270 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 2)) (pow (cos (/ -1/2 K)) 4))) (* -120 (/ (* (pow (* 1 0) 3) 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 4))) (* 30 (/ (* 1 (pow (* 2 0) 3)) (pow (cos (/ -1/2 K)) 3))) (* 120 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* 30 (/ (* (pow (* 1 0) 2) 1 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* -10 (/ (* 1 1 (pow (* 6 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* -15 (/ (* 1 (pow (* 2 0) 1) 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* -6 (/ (* (pow (* 1 0) 1) 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 1 (pow (* 720 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 720) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 6) 720)) (* (/ (pow 0 4) 24) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 2) 2)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (cos (/ -1/2 (/ 1 (- K)))) 1/3) into (pow (cos (* 1/2 K)) 1/3)
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 2 1 1)
* [misc]approximate:  Taking taylor expansion of (cbrt (cos (/ K 2))) in (K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (- 1/8)) 1)) (pow 1 1)))) 2) into -1/8
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/8) (+ (* 0 0) (* 0 0))) into -1/24
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ K 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ K 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ K 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]backup-simplify:  Simplify (log 1) into 0
* [misc]backup-simplify:  Simplify (* 1/3 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (/ (pow 1/2 2) 2)) 0) into (- 1/8)
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow 1 2))) (* 1 (/ (* 1 (pow (* 2 (- 1/8)) 1)) (pow 1 1)))) 2) into -1/8
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/8) (+ (* 0 0) (* 0 0))) into -1/24
* [misc]backup-simplify:  Simplify (exp 0) into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 2) 2)) (* (/ (pow -1/24 1) 1)))) into -1/24
* [misc]backup-simplify:  Simplify -1/24 into -1/24
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 1/2 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow 1 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 (- 1/8)) 1)) (pow 1 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow 1 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 -1/8) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow -1/24 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* 1/2 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 1/2 4) 24)) 0 (* -1 (/ (pow 1/2 1) 1) (/ (pow 0 1) 1)) (* -1 (/ (pow 0 2) 2)) 0) into 1/384
* [misc]backup-simplify:  Simplify (/ (+ (* -6 (/ (* (pow (* 1 0) 4)) (pow 1 4))) (* 12 (/ (* (pow (* 1 0) 2) (pow (* 2 (- 1/8)) 1)) (pow 1 3))) (* -3 (/ (* 1 (pow (* 2 (- 1/8)) 2)) (pow 1 2))) (* -4 (/ (* (pow (* 1 0) 1) 1 (pow (* 6 0) 1)) (pow 1 2))) (* 1 (/ (* 1 1 1 (pow (* 24 1/384) 1)) (pow 1 1)))) 24) into -1/192
* [misc]backup-simplify:  Simplify (+ (* 1/3 -1/192) (+ (* 0 0) (+ (* 0 -1/8) (+ (* 0 0) (* 0 0))))) into -1/576
* [misc]backup-simplify:  Simplify (* (exp 0) (+ (* (/ (pow 0 4) 24)) (* (/ (pow 0 2) 2) (/ (pow -1/24 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow -1/24 2) 2)) (* (/ (pow -1/576 1) 1)))) into -1/1152
* [misc]backup-simplify:  Simplify -1/1152 into -1/1152
* [misc]backup-simplify:  Simplify (+ (* -1/1152 (pow K 4)) (+ (* -1/24 (pow K 2)) 1)) into (- 1 (+ (* 1/1152 (pow K 4)) (* 1/24 (pow K 2))))
* [misc]approximate:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in (K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 K) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 K) 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]backup-simplify:  Simplify (log (cos (/ 1/2 K))) into (log (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ 1/2 K)))) into (* 1/3 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (pow (cos (/ 1/2 K)) 1/3) into (pow (cos (/ 1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ 1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -6 (/ (* (pow (* 1 0) 4)) (pow (cos (/ 1/2 K)) 4))) (* 12 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* -3 (/ (* 1 (pow (* 2 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* -4 (/ (* (pow (* 1 0) 1) 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 24) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 4) 24)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 24 (/ (* (pow (* 1 0) 5)) (pow (cos (/ 1/2 K)) 5))) (* -60 (/ (* (pow (* 1 0) 3) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 4))) (* 30 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 2)) (pow (cos (/ 1/2 K)) 3))) (* 20 (/ (* (pow (* 1 0) 2) 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* -10 (/ (* 1 (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* -5 (/ (* (pow (* 1 0) 1) 1 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 120) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 5) 120)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -120 (/ (* (pow (* 1 0) 6)) (pow (cos (/ 1/2 K)) 6))) (* 360 (/ (* (pow (* 1 0) 4) (pow (* 2 0) 1)) (pow (cos (/ 1/2 K)) 5))) (* -270 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 2)) (pow (cos (/ 1/2 K)) 4))) (* -120 (/ (* (pow (* 1 0) 3) 1 (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 4))) (* 30 (/ (* 1 (pow (* 2 0) 3)) (pow (cos (/ 1/2 K)) 3))) (* 120 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* 30 (/ (* (pow (* 1 0) 2) 1 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 3))) (* -10 (/ (* 1 1 (pow (* 6 0) 2)) (pow (cos (/ 1/2 K)) 2))) (* -15 (/ (* 1 (pow (* 2 0) 1) 1 (pow (* 24 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* -6 (/ (* (pow (* 1 0) 1) 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ 1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 1 (pow (* 720 0) 1)) (pow (cos (/ 1/2 K)) 1)))) 720) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ 1/2 K))))) (+ (* (/ (pow 0 6) 720)) (* (/ (pow 0 4) 24) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 2) 2)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (cos (/ 1/2 (/ 1 K))) 1/3) into (pow (cos (* 1/2 K)) 1/3)
* [misc]approximate:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in (K) around 0
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]taylor:  Taking taylor expansion of (cbrt (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Rewrote expression to (pow (cos (/ (/ 1 (- K)) 2)) 1/3)
* [misc]taylor:  Taking taylor expansion of (exp (* 1/3 (log (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/3 (log (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 (cos (/ (/ 1 (- K)) 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]backup-simplify:  Simplify (log (cos (/ -1/2 K))) into (log (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 1/3 (log (cos (/ -1/2 K)))) into (* 1/3 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 1/3 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (pow (cos (/ -1/2 K)) 1/3) into (pow (cos (/ -1/2 K)) 1/3)
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (* 0 (log (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 2 (/ (* (pow (* 1 0) 3)) (pow (cos (/ -1/2 K)) 3))) (* -3 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 6) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -6 (/ (* (pow (* 1 0) 4)) (pow (cos (/ -1/2 K)) 4))) (* 12 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* -3 (/ (* 1 (pow (* 2 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* -4 (/ (* (pow (* 1 0) 1) 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 24) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 4) 24)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 24 (/ (* (pow (* 1 0) 5)) (pow (cos (/ -1/2 K)) 5))) (* -60 (/ (* (pow (* 1 0) 3) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 4))) (* 30 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 2)) (pow (cos (/ -1/2 K)) 3))) (* 20 (/ (* (pow (* 1 0) 2) 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* -10 (/ (* 1 (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* -5 (/ (* (pow (* 1 0) 1) 1 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 120) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 5) 120)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -120 (/ (* (pow (* 1 0) 6)) (pow (cos (/ -1/2 K)) 6))) (* 360 (/ (* (pow (* 1 0) 4) (pow (* 2 0) 1)) (pow (cos (/ -1/2 K)) 5))) (* -270 (/ (* (pow (* 1 0) 2) (pow (* 2 0) 2)) (pow (cos (/ -1/2 K)) 4))) (* -120 (/ (* (pow (* 1 0) 3) 1 (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 4))) (* 30 (/ (* 1 (pow (* 2 0) 3)) (pow (cos (/ -1/2 K)) 3))) (* 120 (/ (* (pow (* 1 0) 1) (pow (* 2 0) 1) (pow (* 6 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* 30 (/ (* (pow (* 1 0) 2) 1 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 3))) (* -10 (/ (* 1 1 (pow (* 6 0) 2)) (pow (cos (/ -1/2 K)) 2))) (* -15 (/ (* 1 (pow (* 2 0) 1) 1 (pow (* 24 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* -6 (/ (* (pow (* 1 0) 1) 1 1 1 (pow (* 120 0) 1)) (pow (cos (/ -1/2 K)) 2))) (* 1 (/ (* 1 1 1 1 1 (pow (* 720 0) 1)) (pow (cos (/ -1/2 K)) 1)))) 720) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/3 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 1/3 (log (cos (/ -1/2 K))))) (+ (* (/ (pow 0 6) 720)) (* (/ (pow 0 4) 24) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2) (/ (pow 0 2) 2)) (* (/ (pow 0 2) 2) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 3) 6)) (* (/ (pow 0 1) 1) (/ (pow 0 1) 1)) (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (pow (cos (/ -1/2 (/ 1 (- K)))) 1/3) into (pow (cos (* 1/2 K)) 1/3)
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 80 ] simplifiying candidate #<alt (λ (J K U) (log1p (expm1 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* * * * [misc]progress:  [ 2 / 80 ] simplifiying candidate #<alt (λ (J K U) (expm1 (log1p (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* * * * [misc]progress:  [ 3 / 80 ] simplifiying candidate #<alt (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) 1))>
* [enter]simplify:  Simplifying (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (86 enodes)
* * [misc]simplify:  iters left: 3 (186 enodes)
* * [misc]simplify:  iters left: 2 (369 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 1))
* * * * [misc]progress:  [ 4 / 80 ] simplifiying candidate #<alt (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) 1))>
* [enter]simplify:  Simplifying (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (86 enodes)
* * [misc]simplify:  iters left: 3 (186 enodes)
* * [misc]simplify:  iters left: 2 (369 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 1))
* * * * [misc]progress:  [ 5 / 80 ] simplifiying candidate #<alt (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) 1))>
* [enter]simplify:  Simplifying (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (86 enodes)
* * [misc]simplify:  iters left: 3 (186 enodes)
* * [misc]simplify:  iters left: 2 (369 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 1))
* * * * [misc]progress:  [ 6 / 80 ] simplifiying candidate #<alt (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) 1))>
* [enter]simplify:  Simplifying (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (86 enodes)
* * [misc]simplify:  iters left: 3 (186 enodes)
* * [misc]simplify:  iters left: 2 (369 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 1))
* * * * [misc]progress:  [ 7 / 80 ] simplifiying candidate #<alt (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) 1))>
* [enter]simplify:  Simplifying (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (86 enodes)
* * [misc]simplify:  iters left: 3 (186 enodes)
* * [misc]simplify:  iters left: 2 (369 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (pow (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 1))
* * * * [misc]progress:  [ 8 / 80 ] simplifiying candidate #<alt (λ (J K U) (pow (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) 1))>
* * * * [misc]progress:  [ 9 / 80 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (+ (+ (log (cbrt (cos (/ K 2)))) (log (cbrt (cos (/ K 2))))) (+ (log (cbrt (cos (/ K 2)))) (log (* -2 J)))))))>
* [enter]simplify:  Simplifying (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (+ (+ (log (cbrt (cos (/ K 2)))) (log (cbrt (cos (/ K 2))))) (+ (log (cbrt (cos (/ K 2)))) (log (* -2 J)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (80 enodes)
* * [misc]simplify:  iters left: 3 (168 enodes)
* * [misc]simplify:  iters left: 2 (329 enodes)
* * [misc]simplify:  iters left: 1 (406 enodes)
* [exit]simplify:  Simplified to (+ (+ (+ (log (* J -2)) (log (cbrt (cos (/ K 2))))) (log (cbrt (cos (/ K 2))))) (+ (log (cbrt (cos (/ K 2)))) (log (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (+ (+ (log (* J -2)) (log (cbrt (cos (/ K 2))))) (log (cbrt (cos (/ K 2))))) (+ (log (cbrt (cos (/ K 2)))) (log (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 10 / 80 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (+ (+ (log (cbrt (cos (/ K 2)))) (log (cbrt (cos (/ K 2))))) (log (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* [enter]simplify:  Simplifying (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (+ (+ (log (cbrt (cos (/ K 2)))) (log (cbrt (cos (/ K 2))))) (log (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (76 enodes)
* * [misc]simplify:  iters left: 3 (149 enodes)
* * [misc]simplify:  iters left: 2 (282 enodes)
* * [misc]simplify:  iters left: 1 (430 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (* (cbrt (cos (/ K 2))) (* J -2))) (+ (log (cbrt (cos (/ K 2)))) (log (cbrt (cos (/ K 2)))))) (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (+ (log (* (cbrt (cos (/ K 2))) (* J -2))) (+ (log (cbrt (cos (/ K 2)))) (log (cbrt (cos (/ K 2)))))) (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 11 / 80 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (+ (log (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (+ (log (cbrt (cos (/ K 2)))) (log (* -2 J)))))))>
* [enter]simplify:  Simplifying (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (+ (log (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (+ (log (cbrt (cos (/ K 2)))) (log (* -2 J)))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (79 enodes)
* * [misc]simplify:  iters left: 3 (170 enodes)
* * [misc]simplify:  iters left: 2 (321 enodes)
* * [misc]simplify:  iters left: 1 (387 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (cbrt (cos (/ K 2)))) (log (cbrt (cos (/ K 2))))) (+ (+ (log (* -2 J)) (log (cbrt (cos (/ K 2))))) (log (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (+ (log (cbrt (cos (/ K 2)))) (log (cbrt (cos (/ K 2))))) (+ (+ (log (* -2 J)) (log (cbrt (cos (/ K 2))))) (log (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 12 / 80 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (+ (log (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (log (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* [enter]simplify:  Simplifying (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (+ (log (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (log (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (74 enodes)
* * [misc]simplify:  iters left: 3 (139 enodes)
* * [misc]simplify:  iters left: 2 (250 enodes)
* * [misc]simplify:  iters left: 1 (371 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (cbrt (cos (/ K 2)))) (+ (log (cbrt (cos (/ K 2)))) (log (cbrt (cos (/ K 2)))))) (+ (log (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (log (* J -2))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (+ (log (cbrt (cos (/ K 2)))) (+ (log (cbrt (cos (/ K 2)))) (log (cbrt (cos (/ K 2)))))) (+ (log (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (log (* J -2))))))
* * * * [misc]progress:  [ 13 / 80 ] simplifiying candidate #<alt (λ (J K U) (exp (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (log (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* [enter]simplify:  Simplifying (+ (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (log (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (82 enodes)
* * [misc]simplify:  iters left: 3 (171 enodes)
* * [misc]simplify:  iters left: 2 (325 enodes)
* [exit]simplify:  Simplified to (+ (log (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (log (* (* -2 J) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (exp (+ (log (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (log (* (* -2 J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 14 / 80 ] simplifiying candidate #<alt (λ (J K U) (exp (log (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* * * * [misc]progress:  [ 15 / 80 ] simplifiying candidate #<alt (λ (J K U) (log (exp (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* * * * [misc]progress:  [ 16 / 80 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (* (* (* -2 J) (* -2 J)) (* -2 J)))))))>
* [enter]simplify:  Simplifying (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (* (* (* -2 J) (* -2 J)) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (49 enodes)
* * [misc]simplify:  iters left: 4 (150 enodes)
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* (cos (/ K 2)) (pow (* -2 J) 3)) (* (cos (/ K 2)) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* (cos (/ K 2)) (pow (* -2 J) 3)) (* (cos (/ K 2)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 17 / 80 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (* (* (cbrt (cos (/ K 2))) (* -2 J)) (* (cbrt (cos (/ K 2))) (* -2 J))) (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* [enter]simplify:  Simplifying (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (* (* (cbrt (cos (/ K 2))) (* -2 J)) (* (cbrt (cos (/ K 2))) (* -2 J))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (50 enodes)
* * [misc]simplify:  iters left: 4 (168 enodes)
* [exit]simplify:  Simplified to (* (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* J -2))) (* (* (cbrt (cos (/ K 2))) (* J -2)) (* (cbrt (cos (/ K 2))) (* J -2)))) (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (cos (/ K 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* J -2))) (* (* (cbrt (cos (/ K 2))) (* J -2)) (* (cbrt (cos (/ K 2))) (* J -2)))) (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (cos (/ K 2)) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 18 / 80 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (* (cos (/ K 2)) (* (* (* -2 J) (* -2 J)) (* -2 J)))))))>
* [enter]simplify:  Simplifying (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (* (cos (/ K 2)) (* (* (* -2 J) (* -2 J)) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (24 enodes)
* * [misc]simplify:  iters left: 5 (59 enodes)
* * [misc]simplify:  iters left: 4 (191 enodes)
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3)))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3)))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 19 / 80 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (* (* (* (cbrt (cos (/ K 2))) (* -2 J)) (* (cbrt (cos (/ K 2))) (* -2 J))) (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* [enter]simplify:  Simplifying (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (* (* (* (cbrt (cos (/ K 2))) (* -2 J)) (* (cbrt (cos (/ K 2))) (* -2 J))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (24 enodes)
* * [misc]simplify:  iters left: 5 (59 enodes)
* * [misc]simplify:  iters left: 4 (201 enodes)
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3)))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* J -2) 3)))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 20 / 80 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* [enter]simplify:  Simplifying (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (50 enodes)
* * [misc]simplify:  iters left: 4 (171 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* J -2))) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3)) (* (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* J -2))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* J -2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (cbrt (* (* (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* J -2))) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3)) (* (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* J -2))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* J -2)))))))
* * * * [misc]progress:  [ 21 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (* (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))) (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))) (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* * * * [misc]progress:  [ 22 / 80 ] simplifiying candidate #<alt (λ (J K U) (cbrt (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* * * * [misc]progress:  [ 23 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))) (sqrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))))>
* * * * [misc]progress:  [ 24 / 80 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))))>
* * * * [misc]progress:  [ 25 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (* (cbrt (cos (/ K 2))) (* -2 J))))>
* [enter]simplify:  Simplifying (* (cbrt (cos (/ K 2))) (* -2 J))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (21 enodes)
* [exit]simplify:  Simplified to (* (* -2 J) (cbrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 2) to (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (* (* -2 J) (cbrt (cos (/ K 2))))))
* * * * [misc]progress:  [ 26 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))))>
* [enter]simplify:  Simplifying (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (13 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (32 enodes)
* * [misc]simplify:  iters left: 2 (44 enodes)
* * [misc]simplify:  iters left: 1 (45 enodes)
* [exit]simplify:  Simplified to (* (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))))
* * * * [misc]progress:  [ 27 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))))>
* [enter]simplify:  Simplifying (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (18 enodes)
* * [misc]simplify:  iters left: 4 (24 enodes)
* * [misc]simplify:  iters left: 3 (31 enodes)
* * [misc]simplify:  iters left: 2 (43 enodes)
* * [misc]simplify:  iters left: 1 (44 enodes)
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 1) to (λ (J K U) (* (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))))
* * * * [misc]progress:  [ 28 / 80 ] simplifiying candidate #<alt (λ (J K U) (* 1 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))))))>
* * * * [misc]progress:  [ 29 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* * * * [misc]progress:  [ 30 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (log1p (expm1 (cbrt (cos (/ K 2))))) (* -2 J)))))>
* * * * [misc]progress:  [ 31 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (expm1 (log1p (cbrt (cos (/ K 2))))) (* -2 J)))))>
* * * * [misc]progress:  [ 32 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (pow (cos (/ K 2)) 1/3) (* -2 J)))))>
* * * * [misc]progress:  [ 33 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (pow (cbrt (cos (/ K 2))) 1) (* -2 J)))))>
* * * * [misc]progress:  [ 34 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (exp (log (cbrt (cos (/ K 2))))) (* -2 J)))))>
* * * * [misc]progress:  [ 35 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (log (exp (cbrt (cos (/ K 2))))) (* -2 J)))))>
* * * * [misc]progress:  [ 36 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (* (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cbrt (cos (/ K 2))))) (* -2 J)))))>
* [enter]simplify:  Simplifying (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (7 enodes)
* [exit]simplify:  Simplified to (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 2 2 1 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (* (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cbrt (cos (/ K 2))))) (* -2 J)))))
* * * * [misc]progress:  [ 37 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (* (cbrt (sqrt (cos (/ K 2)))) (cbrt (sqrt (cos (/ K 2))))) (* -2 J)))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 5 (6 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 2 2 1 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (* (cbrt (sqrt (cos (/ K 2)))) (cbrt (sqrt (cos (/ K 2))))) (* -2 J)))))
* * * * [misc]progress:  [ 38 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (* (cbrt 1) (cbrt (cos (/ K 2)))) (* -2 J)))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (cbrt 1)
* [misc]simplify:  Simplified (2 2 2 1 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (* (cbrt 1) (cbrt (cos (/ K 2)))) (* -2 J)))))
* * * * [misc]progress:  [ 39 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (* (* (cbrt (cbrt (cos (/ K 2)))) (cbrt (cbrt (cos (/ K 2))))) (cbrt (cbrt (cos (/ K 2))))) (* -2 J)))))>
* * * * [misc]progress:  [ 40 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2))))) (* -2 J)))))>
* * * * [misc]progress:  [ 41 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (* (sqrt (cbrt (cos (/ K 2)))) (sqrt (cbrt (cos (/ K 2))))) (* -2 J)))))>
* * * * [misc]progress:  [ 42 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (* 1 (cbrt (cos (/ K 2)))) (* -2 J)))))>
* * * * [misc]progress:  [ 43 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (log1p (expm1 (cbrt (cos (/ K 2)))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 44 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (expm1 (log1p (cbrt (cos (/ K 2)))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 45 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (pow (cos (/ K 2)) 1/3)) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 46 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (pow (cbrt (cos (/ K 2))) 1)) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 47 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (exp (log (cbrt (cos (/ K 2)))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 48 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (log (exp (cbrt (cos (/ K 2)))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 49 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (* (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cbrt (cos (/ K 2)))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (7 enodes)
* [exit]simplify:  Simplified to (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 2 1 2 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (* (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cbrt (cos (/ K 2)))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 50 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (* (cbrt (sqrt (cos (/ K 2)))) (cbrt (sqrt (cos (/ K 2)))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 5 (6 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 2 1 2 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (* (cbrt (sqrt (cos (/ K 2)))) (cbrt (sqrt (cos (/ K 2)))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 51 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (* (cbrt 1) (cbrt (cos (/ K 2))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (cbrt 1)
* [misc]simplify:  Simplified (2 2 1 2 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (* (cbrt 1) (cbrt (cos (/ K 2))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 52 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (* (* (cbrt (cbrt (cos (/ K 2)))) (cbrt (cbrt (cos (/ K 2))))) (cbrt (cbrt (cos (/ K 2)))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 53 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2)))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 54 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (* (sqrt (cbrt (cos (/ K 2)))) (sqrt (cbrt (cos (/ K 2)))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 55 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (* 1 (cbrt (cos (/ K 2))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 56 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (log1p (expm1 (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 57 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (expm1 (log1p (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 58 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (pow (cos (/ K 2)) 1/3) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 59 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (pow (cbrt (cos (/ K 2))) 1) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 60 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (exp (log (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 61 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (log (exp (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 62 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (* (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (7 enodes)
* [exit]simplify:  Simplified to (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* [misc]simplify:  Simplified (2 2 1 1 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (* (cbrt (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 63 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (* (cbrt (sqrt (cos (/ K 2)))) (cbrt (sqrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (cbrt (sqrt (cos (/ K 2))))
* * [misc]simplify:  iters left: 5 (6 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (cos (/ K 2))))
* [misc]simplify:  Simplified (2 2 1 1 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (* (cbrt (sqrt (cos (/ K 2)))) (cbrt (sqrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 64 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (* (cbrt 1) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (cbrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (cbrt 1)
* [misc]simplify:  Simplified (2 2 1 1 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (* (cbrt 1) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 65 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (* (* (cbrt (cbrt (cos (/ K 2)))) (cbrt (cbrt (cos (/ K 2))))) (cbrt (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 66 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 67 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (* (sqrt (cbrt (cos (/ K 2)))) (sqrt (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 68 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (* 1 (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* * * * [misc]progress:  [ 69 / 80 ] simplifiying candidate #<alt (λ (J K U) (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J)))))>
* [enter]simplify:  Simplifying (- (+ (* 2 J) (* 1/4 (/ (pow U 2) J))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (47 enodes)
* * [misc]simplify:  iters left: 3 (80 enodes)
* * [misc]simplify:  iters left: 2 (117 enodes)
* * [misc]simplify:  iters left: 1 (158 enodes)
* [exit]simplify:  Simplified to (- (* (- J) 2) (/ (* 1/4 U) (/ J U)))
* [misc]simplify:  Simplified (2) to (λ (J K U) (- (* (- J) 2) (/ (* 1/4 U) (/ J U))))
* * * * [misc]progress:  [ 70 / 80 ] simplifiying candidate #<alt (λ (J K U) (* -1 U))>
* [enter]simplify:  Simplifying (* -1 U)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (- U)
* [misc]simplify:  Simplified (2) to (λ (J K U) (- U))
* * * * [misc]progress:  [ 71 / 80 ] simplifiying candidate #<alt (λ (J K U) (* -1 U))>
* [enter]simplify:  Simplifying (* -1 U)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (5 enodes)
* [exit]simplify:  Simplified to (- U)
* [misc]simplify:  Simplified (2) to (λ (J K U) (- U))
* * * * [misc]progress:  [ 72 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (- 1 (+ (* 1/1152 (pow K 4)) (* 1/24 (pow K 2)))) (* -2 J)))))>
* [enter]simplify:  Simplifying (- 1 (+ (* 1/1152 (pow K 4)) (* 1/24 (pow K 2))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (38 enodes)
* * [misc]simplify:  iters left: 3 (69 enodes)
* * [misc]simplify:  iters left: 2 (128 enodes)
* * [misc]simplify:  iters left: 1 (167 enodes)
* [exit]simplify:  Simplified to (- (fma (pow K 4) (- 1/1152) 1) (* 1/24 (* K K)))
* [misc]simplify:  Simplified (2 2 2 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (- (fma (pow K 4) (- 1/1152) 1) (* 1/24 (* K K))) (* -2 J)))))
* * * * [misc]progress:  [ 73 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (pow (cos (* 1/2 K)) 1/3) (* -2 J)))))>
* [enter]simplify:  Simplifying (pow (cos (* 1/2 K)) 1/3)
* * [misc]simplify:  iters left: 4 (6 enodes)
* * [misc]simplify:  iters left: 3 (8 enodes)
* [exit]simplify:  Simplified to (cbrt (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2 2 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (* 1/2 K))) (* -2 J)))))
* * * * [misc]progress:  [ 74 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (pow (cos (* 1/2 K)) 1/3) (* -2 J)))))>
* [enter]simplify:  Simplifying (pow (cos (* 1/2 K)) 1/3)
* * [misc]simplify:  iters left: 4 (6 enodes)
* * [misc]simplify:  iters left: 3 (8 enodes)
* [exit]simplify:  Simplified to (cbrt (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2 2 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (* 1/2 K))) (* -2 J)))))
* * * * [misc]progress:  [ 75 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (- 1 (+ (* 1/1152 (pow K 4)) (* 1/24 (pow K 2))))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (- 1 (+ (* 1/1152 (pow K 4)) (* 1/24 (pow K 2))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (38 enodes)
* * [misc]simplify:  iters left: 3 (69 enodes)
* * [misc]simplify:  iters left: 2 (128 enodes)
* * [misc]simplify:  iters left: 1 (167 enodes)
* [exit]simplify:  Simplified to (- (fma (pow K 4) (- 1/1152) 1) (* 1/24 (* K K)))
* [misc]simplify:  Simplified (2 2 1 2) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (- (fma (pow K 4) (- 1/1152) 1) (* 1/24 (* K K)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 76 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (pow (cos (* 1/2 K)) 1/3)) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (pow (cos (* 1/2 K)) 1/3)
* * [misc]simplify:  iters left: 4 (6 enodes)
* * [misc]simplify:  iters left: 3 (8 enodes)
* [exit]simplify:  Simplified to (cbrt (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2 1 2) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (* 1/2 K)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 77 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (pow (cos (* 1/2 K)) 1/3)) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (pow (cos (* 1/2 K)) 1/3)
* * [misc]simplify:  iters left: 4 (6 enodes)
* * [misc]simplify:  iters left: 3 (8 enodes)
* [exit]simplify:  Simplified to (cbrt (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2 1 2) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (* 1/2 K)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 78 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (- 1 (+ (* 1/1152 (pow K 4)) (* 1/24 (pow K 2)))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (- 1 (+ (* 1/1152 (pow K 4)) (* 1/24 (pow K 2))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (38 enodes)
* * [misc]simplify:  iters left: 3 (69 enodes)
* * [misc]simplify:  iters left: 2 (128 enodes)
* * [misc]simplify:  iters left: 1 (167 enodes)
* [exit]simplify:  Simplified to (- (fma (pow K 4) (- 1/1152) 1) (* 1/24 (* K K)))
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (- (fma (pow K 4) (- 1/1152) 1) (* 1/24 (* K K))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 79 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (pow (cos (* 1/2 K)) 1/3) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (pow (cos (* 1/2 K)) 1/3)
* * [misc]simplify:  iters left: 4 (6 enodes)
* * [misc]simplify:  iters left: 3 (8 enodes)
* [exit]simplify:  Simplified to (cbrt (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (* 1/2 K))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * * [misc]progress:  [ 80 / 80 ] simplifiying candidate #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (pow (cos (* 1/2 K)) 1/3) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))>
* [enter]simplify:  Simplifying (pow (cos (* 1/2 K)) 1/3)
* * [misc]simplify:  iters left: 4 (6 enodes)
* * [misc]simplify:  iters left: 3 (8 enodes)
* [exit]simplify:  Simplified to (cbrt (cos (* 1/2 K)))
* [misc]simplify:  Simplified (2 2 1 1) to (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (* 1/2 K))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))
* * * [misc]progress:  adding candidates to table
* [misc]progress:  [Phase 3 of 3] Extracting.
* * [misc]regime:  Finding splitpoints for: (#<alt (λ (J K U) (cbrt (* (* (pow (* -2 J) 3) (pow (cos (/ K 2)) 3)) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))> #<alt (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (- U))> #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))> #<alt (λ (J K U) (* (cbrt (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)) (* -2 J)))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (* (cos (/ K 2)) (* -2 J))) (sqrt (* (cos (/ K 2)) (* -2 J))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (* (cos (/ K 2)) (* -2 J))) (cbrt (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (cos (/ K 2)) (* -2 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) (cbrt (* (* (pow (* -2 J) 3) (pow (cos (/ K 2)) 3)) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))> #<alt (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (- U))> #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))> #<alt (λ (J K U) (* (cbrt (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)) (* -2 J)))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (* (cos (/ K 2)) (* -2 J))) (sqrt (* (cos (/ K 2)) (* -2 J))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (* (cos (/ K 2)) (* -2 J))) (cbrt (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (cos (/ K 2)) (* -2 J))))))>)
* * * * [misc]regimes:  Trying to branch on K from (#<alt (λ (J K U) (cbrt (* (* (pow (* -2 J) 3) (pow (cos (/ K 2)) 3)) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))> #<alt (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (- U))> #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))> #<alt (λ (J K U) (* (cbrt (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)) (* -2 J)))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (* (cos (/ K 2)) (* -2 J))) (sqrt (* (cos (/ K 2)) (* -2 J))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (* (cos (/ K 2)) (* -2 J))) (cbrt (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (cos (/ K 2)) (* -2 J))))))>)
* * * * [misc]regimes:  Trying to branch on (/ K 2) from (#<alt (λ (J K U) (cbrt (* (* (pow (* -2 J) 3) (pow (cos (/ K 2)) 3)) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))> #<alt (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (- U))> #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))> #<alt (λ (J K U) (* (cbrt (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)) (* -2 J)))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (* (cos (/ K 2)) (* -2 J))) (sqrt (* (cos (/ K 2)) (* -2 J))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (* (cos (/ K 2)) (* -2 J))) (cbrt (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (cos (/ K 2)) (* -2 J))))))>)
* * * * [misc]regimes:  Trying to branch on (cos (/ K 2)) from (#<alt (λ (J K U) (cbrt (* (* (pow (* -2 J) 3) (pow (cos (/ K 2)) 3)) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))> #<alt (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (- U))> #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))> #<alt (λ (J K U) (* (cbrt (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)) (* -2 J)))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (* (cos (/ K 2)) (* -2 J))) (sqrt (* (cos (/ K 2)) (* -2 J))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (* (cos (/ K 2)) (* -2 J))) (cbrt (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (cos (/ K 2)) (* -2 J))))))>)
* * * * [misc]regimes:  Trying to branch on J from (#<alt (λ (J K U) (cbrt (* (* (pow (* -2 J) 3) (pow (cos (/ K 2)) 3)) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))> #<alt (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (- U))> #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))> #<alt (λ (J K U) (* (cbrt (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)) (* -2 J)))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (* (cos (/ K 2)) (* -2 J))) (sqrt (* (cos (/ K 2)) (* -2 J))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (* (cos (/ K 2)) (* -2 J))) (cbrt (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (cos (/ K 2)) (* -2 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) (cbrt (* (* (pow (* -2 J) 3) (pow (cos (/ K 2)) 3)) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))> #<alt (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (- U))> #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))> #<alt (λ (J K U) (* (cbrt (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)) (* -2 J)))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (* (cos (/ K 2)) (* -2 J))) (sqrt (* (cos (/ K 2)) (* -2 J))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (* (cos (/ K 2)) (* -2 J))) (cbrt (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (cos (/ K 2)) (* -2 J))))))>)
* * * [misc]regime:  Found split indices: #<option (#s(si 5 129) #s(si 4 146) #s(si 5 256))>
* [misc]binary-search:  Improving bounds with binary search for J and (#<alt (λ (J K U) (cbrt (* (* (pow (* -2 J) 3) (pow (cos (/ K 2)) 3)) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))> #<alt (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (- U))> #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))> #<alt (λ (J K U) (* (cbrt (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)) (* -2 J)))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (* (cos (/ K 2)) (* -2 J))) (sqrt (* (cos (/ K 2)) (* -2 J))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (* (cos (/ K 2)) (* -2 J))) (cbrt (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (cos (/ K 2)) (* -2 J))))))>)
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* * * * [misc]points:  Sampling 16 additional inputs, on iter 0 have 0 / 16
* * * * [misc]points:  Computing exacts for 16 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 16 points with exact outputs
* [misc]regimes:  Found splitpoints: (#s(sp 5 J -2.2742217763171094e-245) #s(sp 4 J 5.823519172747551e-285) #s(sp 5 J +nan.0)) , with alts (#<alt (λ (J K U) (cbrt (* (* (pow (* -2 J) 3) (pow (cos (/ K 2)) 3)) (pow (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) 3))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* (cbrt (cos (/ K 2))) (* -2 J)))))> #<alt (λ (J K U) (* (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))))> #<alt (λ (J K U) (- U))> #<alt (λ (J K U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)))> #<alt (λ (J K U) (* (cbrt (pow (* (cos (/ K 2)) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)) (* -2 J)))> #<alt (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt (λ (J K U) (cbrt (* (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (pow (* (* J -2) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (sqrt (* (cos (/ K 2)) (* -2 J))) (sqrt (* (cos (/ K 2)) (* -2 J))))))> #<alt (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* (cbrt (* (cos (/ K 2)) (* -2 J))) (cbrt (* (cos (/ K 2)) (* -2 J)))) (cbrt (* (cos (/ K 2)) (* -2 J))))))>)
* [enter]simplify:  Simplifying (if (<= J -2.2742217763171094e-245) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J)) (if (<= J 5.823519172747551e-285) (- U) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* -2 J))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* [exit]simplify:  Simplified to (if (or (<= J -2.2742217763171094e-245) (not (<= J 5.823519172747551e-285))) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (cos (/ K 2))) (* J -2)) (- U))
* * * * [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:  Computing exacts for 8000 points
* * * * [misc]points:  Setting MPFR precision to 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [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 64
* * * * [misc]points:  Setting MPFR precision to 320
* * * * [misc]points:  Filtering points with unrepresentable outputs
* * * * [exit]points:  Sampled 8001 points with exact outputs