* [misc]progress:  [Phase 1 of 3] Setting up.
* * * [misc]progress:  [1/2] Preparing points
* * * * [misc]points:  Sampling 266 additional inputs, have 0 / 256
* * * * [misc]points:  Computing 266 additional correct outputs
* * * * [misc]points:  Setting precision to 2
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Filtering points with unrepresentable 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 (158 enodes)
* * [misc]simplify:  iters left: 2 (390 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [misc]progress:  iteration 1 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 3 ] rewriting at (2)
* * * * [misc]progress:  [ 2 / 3 ] rewriting at (2 1)
* * * * [misc]progress:  [ 3 / 3 ] rewriting at (2 2 2)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 3 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* J -2) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* J -2) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* J -2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* J -2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 (* 0 -2) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (* 0 (* 1/2 (/ U (cos (* 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 1 -2)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (cos (* 1/2 K)))) into (- (* 2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* (- (* 2 (cos (* 1/2 K)))) (* 1/2 (/ U (cos (* 1/2 K)))))) into (- U)
* [misc]taylor:  Taking taylor expansion of (- U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]taylor:  Taking taylor expansion of (- U) in U
* [misc]taylor:  Taking taylor expansion of U in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ U (cos (* 1/2 K)))))) into (/ (cos (* 1/2 K)) U)
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 1 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 (/ (cos (* 1/2 K)) U)) (+ (* (- (* 2 (cos (* 1/2 K)))) 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]approximate:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in U
* [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 -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 J) -2) (cos (/ (/ 1 K) 2))) (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in K
* [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 -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 (* (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]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 (* (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 (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 (* (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]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 (* (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 (* 1 -2) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 K))) 1) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (* 0 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 1/2 (* (cos (/ 1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))) into (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (cos (/ 1/2 K)) (pow U 2)) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (exp (* 2 (log U))) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (pow U 2)) into (* (cos (/ 1/2 K)) (pow U 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) into (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) into (/ 1/4 (* (cos (/ 1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (- (/ 1/4 (* (cos (/ 1/2 K)) (pow U 2)))) into (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/4 in U
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (cos (/ 1/2 K)) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]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 (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ 1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (+ (* 0 (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log U))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (pow U 2))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) (/ 0 (* (cos (/ 1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (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/4 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 (/ 1 K)))) (* 1 (* 1 (/ 1 (/ 1 J))))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in U
* [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 -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in K
* [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 -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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)))) 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 (* -1 -2) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 K))) 1) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (* 0 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))) into (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (exp (* 2 (log U))) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (pow U 2)) into (* (cos (/ -1/2 K)) (pow U 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) into (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) into (/ 1/4 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (* (cos (/ -1/2 K)) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of 1/4 in U
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]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/4 (cos (/ -1/2 K))) into (/ 1/4 (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 (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/4 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (cos (/ -1/2 K)) U)) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ -1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (+ (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log U))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (pow U 2))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) (/ 0 (* (cos (/ -1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/4 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* 1 (/ 1 (/ 1 (- J)))))) into (* -2 (* (cos (* 1/2 K)) J))
* * * * [misc]progress:  [ 2 / 3 ] generating series at (2 1)
* [misc]approximate:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* J -2) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [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 (* (* J -2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* J -2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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 (* (* J -2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* J -2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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 (* 0 -2) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 1 -2)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (cos (* 1/2 K)))) into (- (* 2 (cos (* 1/2 K))))
* [misc]taylor:  Taking taylor expansion of (- (* 2 (cos (* 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (* 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (* 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (* 1/2 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/2 1) (* 0 0)) into 1/2
* [misc]backup-simplify:  Simplify (* 2 1) into 2
* [misc]backup-simplify:  Simplify (- 2) into -2
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 1 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* 1 0) (+ (* 0 0) (* 0 -2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (+ (* 0 0) (* 0 (cos (* 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* -2 (* 1 J)) into (* -2 J)
* [misc]approximate:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in K
* [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 -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [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 (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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 (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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 (* 1 -2) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 (/ 1 K)))) (* 1 (/ 1 (/ 1 J)))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in (J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in K
* [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 -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [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 (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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 (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [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 (* -1 -2) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (/ 1 (/ 1 (- J))))) into (* -2 (* (cos (* 1/2 K)) J))
* * * * [misc]progress:  [ 3 / 3 ] generating series at (2 2 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 (* (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]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 (* J (cos (* 1/2 K)))))
* [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 (* 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]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 (* J (cos (* 1/2 K)))))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (log1p (expm1 (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (expm1 (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (82 enodes)
* * [misc]simplify:  iters left: 2 (105 enodes)
* * [misc]simplify:  iters left: 1 (106 enodes)
* [exit]simplify:  Simplified to (expm1 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (expm1 (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 2 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (expm1 (log1p (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (log1p (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (82 enodes)
* * [misc]simplify:  iters left: 2 (105 enodes)
* * [misc]simplify:  iters left: 1 (106 enodes)
* [exit]simplify:  Simplified to (log1p (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (log1p (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 3 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [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 (82 enodes)
* * [misc]simplify:  iters left: 2 (105 enodes)
* * [misc]simplify:  iters left: 1 (106 enodes)
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* * * * [misc]progress:  [ 4 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [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 (82 enodes)
* * [misc]simplify:  iters left: 2 (105 enodes)
* * [misc]simplify:  iters left: 1 (106 enodes)
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* * * * [misc]progress:  [ 5 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1))>
* * * * [misc]progress:  [ 6 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (+ (log (* J -2)) (log (cos (/ K 2)))) (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (+ (+ (log (* J -2)) (log (cos (/ K 2)))) (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (80 enodes)
* * [misc]simplify:  iters left: 2 (109 enodes)
* * [misc]simplify:  iters left: 1 (113 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (cos (/ K 2))) (log (* -2 J))) (log (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (+ (+ (log (cos (/ K 2))) (log (* -2 J))) (log (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2))))))
* * * * [misc]progress:  [ 7 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (log (* (* J -2) (cos (/ K 2)))) (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (+ (log (* (* J -2) (cos (/ K 2)))) (log (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (81 enodes)
* * [misc]simplify:  iters left: 2 (116 enodes)
* * [misc]simplify:  iters left: 1 (125 enodes)
* [exit]simplify:  Simplified to (+ (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (log (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (+ (log (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (log (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 8 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (log (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (log (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (64 enodes)
* * [misc]simplify:  iters left: 3 (130 enodes)
* * [misc]simplify:  iters left: 2 (199 enodes)
* * [misc]simplify:  iters left: 1 (203 enodes)
* [exit]simplify:  Simplified to (log (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (log (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 9 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (log (exp (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (exp (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (61 enodes)
* * [misc]simplify:  iters left: 3 (96 enodes)
* * [misc]simplify:  iters left: 2 (120 enodes)
* * [misc]simplify:  iters left: 1 (121 enodes)
* [exit]simplify:  Simplified to (pow (pow (exp (* -2 J)) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (pow (pow (exp (* -2 J)) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 10 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2)))) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (147 enodes)
* [exit]simplify:  Simplified to (* (* (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)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (* (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)))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* * * * [misc]progress:  [ 11 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (cos (/ K 2)))) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (cos (/ K 2)))) (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (119 enodes)
* * [misc]simplify:  iters left: 3 (431 enodes)
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* -2 J) (cos (/ K 2))) 3)))
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* -2 J) (cos (/ K 2))) 3)))
* * * * [misc]progress:  [ 12 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (cbrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (54 enodes)
* * [misc]simplify:  iters left: 3 (85 enodes)
* * [misc]simplify:  iters left: 2 (107 enodes)
* * [misc]simplify:  iters left: 1 (108 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))) (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))) (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (cbrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (82 enodes)
* * [misc]simplify:  iters left: 2 (105 enodes)
* * [misc]simplify:  iters left: 1 (106 enodes)
* [exit]simplify:  Simplified to (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (cbrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 13 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (94 enodes)
* * [misc]simplify:  iters left: 3 (363 enodes)
* [exit]simplify:  Simplified to (pow (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) 3)
* [exit]simplify:  Simplified to (pow (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) 3)
* * * * [misc]progress:  [ 14 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (sqrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (sqrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (82 enodes)
* * [misc]simplify:  iters left: 2 (105 enodes)
* * [misc]simplify:  iters left: 1 (106 enodes)
* [exit]simplify:  Simplified to (sqrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [enter]simplify:  Simplifying (sqrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (82 enodes)
* * [misc]simplify:  iters left: 2 (105 enodes)
* * [misc]simplify:  iters left: 1 (106 enodes)
* [exit]simplify:  Simplified to (sqrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 15 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* 1 (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 16 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (* (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)))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (65 enodes)
* * [misc]simplify:  iters left: 3 (124 enodes)
* * [misc]simplify:  iters left: 2 (195 enodes)
* * [misc]simplify:  iters left: 1 (241 enodes)
* [exit]simplify:  Simplified to (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* -2 J) (cos (/ K 2))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* -2 J) (cos (/ K 2))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 17 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (81 enodes)
* * [misc]simplify:  iters left: 2 (104 enodes)
* * [misc]simplify:  iters left: 1 (105 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 18 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) 1) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) 1)
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (34 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (58 enodes)
* * [misc]simplify:  iters left: 1 (60 enodes)
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (* -2 J))
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (* -2 J))
* * * * [misc]progress:  [ 19 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* J -2) (* (cos (/ K 2)) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (cos (/ K 2)) (hypot 1 (/ (/ (/ U 2) J) (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 (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (cos (/ K 2)))
* * * * [misc]progress:  [ 20 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* J -2) (cos (/ K 2)))))>
* * * * [misc]progress:  [ 21 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (log1p (expm1 (* (* J -2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (expm1 (* (* J -2) (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 (20 enodes)
* [exit]simplify:  Simplified to (expm1 (* (* -2 J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (expm1 (* (* -2 J) (cos (/ K 2))))
* * * * [misc]progress:  [ 22 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (expm1 (log1p (* (* J -2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (log1p (* (* J -2) (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 (20 enodes)
* [exit]simplify:  Simplified to (log1p (* (* -2 J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (log1p (* (* -2 J) (cos (/ K 2))))
* * * * [misc]progress:  [ 23 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (pow (* (* J -2) (cos (/ K 2))) 1) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* (* J -2) (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (8 enodes)
* * [misc]simplify:  iters left: 4 (12 enodes)
* * [misc]simplify:  iters left: 3 (18 enodes)
* * [misc]simplify:  iters left: 2 (19 enodes)
* [exit]simplify:  Simplified to (* (* -2 J) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (* -2 J) (cos (/ K 2)))
* * * * [misc]progress:  [ 24 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (pow (* (* J -2) (cos (/ K 2))) 1) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* * * * [misc]progress:  [ 25 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (exp (+ (log (* J -2)) (log (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (+ (log (* J -2)) (log (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (20 enodes)
* * [misc]simplify:  iters left: 3 (24 enodes)
* [exit]simplify:  Simplified to (+ (log (cos (/ K 2))) (log (* -2 J)))
* [exit]simplify:  Simplified to (+ (log (cos (/ K 2))) (log (* -2 J)))
* * * * [misc]progress:  [ 26 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (exp (log (* (* J -2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (log (* (* J -2) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (27 enodes)
* * [misc]simplify:  iters left: 3 (43 enodes)
* [exit]simplify:  Simplified to (log (* (* -2 J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (log (* (* -2 J) (cos (/ K 2))))
* * * * [misc]progress:  [ 27 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (log (exp (* (* J -2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (exp (* (* J -2) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (25 enodes)
* * [misc]simplify:  iters left: 3 (26 enodes)
* [exit]simplify:  Simplified to (pow (exp (* -2 J)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (pow (exp (* -2 J)) (cos (/ K 2)))
* * * * [misc]progress:  [ 28 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (cbrt (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (12 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (78 enodes)
* * [misc]simplify:  iters left: 3 (243 enodes)
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* -2 J) 3)))
* [exit]simplify:  Simplified to (* (* (cos (/ K 2)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* -2 J) 3)))
* * * * [misc]progress:  [ 29 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (cbrt (* (* J -2) (cos (/ K 2)))) (cbrt (* (* J -2) (cos (/ K 2))))) (cbrt (* (* J -2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* (cbrt (* (* J -2) (cos (/ K 2)))) (cbrt (* (* J -2) (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 (21 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (* -2 J) (cos (/ K 2)))) (cbrt (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (cbrt (* (* -2 J) (cos (/ K 2)))) (cbrt (* (* -2 J) (cos (/ K 2)))))
* [enter]simplify:  Simplifying (cbrt (* (* J -2) (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 (20 enodes)
* [exit]simplify:  Simplified to (cbrt (* (* -2 J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (cbrt (* (* -2 J) (cos (/ K 2))))
* * * * [misc]progress:  [ 30 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (cbrt (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (56 enodes)
* * [misc]simplify:  iters left: 3 (172 enodes)
* [exit]simplify:  Simplified to (pow (* (* -2 J) (cos (/ K 2))) 3)
* [exit]simplify:  Simplified to (pow (* (* -2 J) (cos (/ K 2))) 3)
* * * * [misc]progress:  [ 31 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (sqrt (* (* J -2) (cos (/ K 2)))) (sqrt (* (* J -2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (sqrt (* (* J -2) (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 (20 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* -2 J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (sqrt (* (* -2 J) (cos (/ K 2))))
* [enter]simplify:  Simplifying (sqrt (* (* J -2) (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 (20 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* -2 J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (sqrt (* (* -2 J) (cos (/ K 2))))
* * * * [misc]progress:  [ 32 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* 1 (* (* J -2) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* * * * [misc]progress:  [ 33 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* (* J -2) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (16 enodes)
* * [misc]simplify:  iters left: 4 (29 enodes)
* * [misc]simplify:  iters left: 3 (39 enodes)
* * [misc]simplify:  iters left: 2 (43 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* -2 J))
* [exit]simplify:  Simplified to (* (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))) (* -2 J))
* * * * [misc]progress:  [ 34 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* (* J -2) (sqrt (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 (20 enodes)
* [exit]simplify:  Simplified to (* (sqrt (cos (/ K 2))) (* -2 J))
* [exit]simplify:  Simplified to (* (sqrt (cos (/ K 2))) (* -2 J))
* * * * [misc]progress:  [ 35 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) 1) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* (* J -2) 1)
* * [misc]simplify:  iters left: 4 (5 enodes)
* * [misc]simplify:  iters left: 3 (11 enodes)
* * [misc]simplify:  iters left: 2 (17 enodes)
* * [misc]simplify:  iters left: 1 (19 enodes)
* [exit]simplify:  Simplified to (* -2 J)
* [exit]simplify:  Simplified to (* -2 J)
* * * * [misc]progress:  [ 36 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* J (* -2 (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* -2 (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (6 enodes)
* * [misc]simplify:  iters left: 4 (7 enodes)
* [exit]simplify:  Simplified to (* -2 (cos (/ K 2)))
* [exit]simplify:  Simplified to (* -2 (cos (/ K 2)))
* * * * [misc]progress:  [ 37 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cos (/ K 2)) (* J -2)) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* * * * [misc]progress:  [ 38 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (log1p (expm1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (expm1 (/ (/ (/ U 2) J) (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 (expm1 (/ (/ (/ U J) 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (expm1 (/ (/ (/ U J) 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 39 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (expm1 (log1p (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (log1p (/ (/ (/ U 2) J) (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 (log1p (/ (/ (/ U J) 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (log1p (/ (/ (/ U J) 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 40 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (pow (/ (/ (/ U 2) J) (cos (/ K 2))) 1))))>
* * * * [misc]progress:  [ 41 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (exp (- (log (/ (/ U 2) J)) (log (cos (/ K 2))))))))>
* [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 (129 enodes)
* * [misc]simplify:  iters left: 1 (287 enodes)
* [exit]simplify:  Simplified to (- (log (/ U (* J 2))) (log (cos (/ K 2))))
* [exit]simplify:  Simplified to (- (log (/ U (* J 2))) (log (cos (/ K 2))))
* * * * [misc]progress:  [ 42 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (exp (log (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (log (/ (/ (/ U 2) J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (17 enodes)
* * [misc]simplify:  iters left: 4 (31 enodes)
* * [misc]simplify:  iters left: 3 (59 enodes)
* * [misc]simplify:  iters left: 2 (125 enodes)
* * [misc]simplify:  iters left: 1 (237 enodes)
* [exit]simplify:  Simplified to (log (/ (/ U (* J 2)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (log (/ (/ U (* J 2)) (cos (/ K 2))))
* * * * [misc]progress:  [ 43 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (log (exp (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (exp (/ (/ (/ U 2) J) (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 (44 enodes)
* [exit]simplify:  Simplified to (exp (/ (/ (/ U J) 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (exp (/ (/ (/ U J) 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 44 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (cbrt (/ (* (* (/ (/ U 2) J) (/ (/ U 2) J)) (/ (/ U 2) J)) (* (* (cos (/ K 2)) (cos (/ K 2))) (cos (/ K 2))))))))>
* [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 (432 enodes)
* [exit]simplify:  Simplified to (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)
* [exit]simplify:  Simplified to (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)
* * * * [misc]progress:  [ 45 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (* (cbrt (/ (/ (/ U 2) J) (cos (/ K 2)))) (cbrt (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (cbrt (/ (/ (/ U 2) J) (cos (/ K 2)))) (cbrt (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (15 enodes)
* * [misc]simplify:  iters left: 4 (21 enodes)
* * [misc]simplify:  iters left: 3 (28 enodes)
* * [misc]simplify:  iters left: 2 (40 enodes)
* * [misc]simplify:  iters left: 1 (41 enodes)
* [exit]simplify:  Simplified to (* (cbrt (/ (/ (/ U J) 2) (cos (/ K 2)))) (cbrt (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (cbrt (/ (/ (/ U J) 2) (cos (/ K 2)))) (cbrt (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [enter]simplify:  Simplifying (cbrt (/ (/ (/ U 2) J) (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 (cbrt (/ (/ (/ U J) 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (cbrt (/ (/ (/ U J) 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 46 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (cbrt (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (/ (/ (/ U 2) J) (cos (/ K 2))) (/ (/ (/ U 2) J) (cos (/ K 2)))) (/ (/ (/ U 2) J) (cos (/ K 2))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (22 enodes)
* * [misc]simplify:  iters left: 4 (65 enodes)
* * [misc]simplify:  iters left: 3 (288 enodes)
* [exit]simplify:  Simplified to (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)
* [exit]simplify:  Simplified to (pow (/ (/ U (* J 2)) (cos (/ K 2))) 3)
* * * * [misc]progress:  [ 47 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (sqrt (/ (/ (/ U 2) J) (cos (/ K 2)))) (sqrt (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (sqrt (/ (/ (/ U 2) J) (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 (sqrt (/ (/ (/ U J) 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (sqrt (/ (/ (/ U J) 2) (cos (/ K 2))))
* [enter]simplify:  Simplifying (sqrt (/ (/ (/ U 2) J) (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 (sqrt (/ (/ (/ U J) 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (sqrt (/ (/ (/ U J) 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 48 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (- (/ (/ U 2) J)) (- (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (- (/ (/ U 2) J))
* * [misc]simplify:  iters left: 6 (6 enodes)
* * [misc]simplify:  iters left: 5 (10 enodes)
* * [misc]simplify:  iters left: 4 (15 enodes)
* * [misc]simplify:  iters left: 3 (16 enodes)
* * [misc]simplify:  iters left: 2 (20 enodes)
* [exit]simplify:  Simplified to (/ (- U) (* J 2))
* [exit]simplify:  Simplified to (/ (- U) (* J 2))
* [enter]simplify:  Simplifying (- (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (5 enodes)
* [exit]simplify:  Simplified to (- (cos (/ K 2)))
* [exit]simplify:  Simplified to (- (cos (/ K 2)))
* * * * [misc]progress:  [ 49 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (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))))))))>
* [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 (* J 2))) (cbrt (cos (/ K 2)))) (/ (cbrt (/ U (* J 2))) (cbrt (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (/ (cbrt (/ U (* J 2))) (cbrt (cos (/ K 2)))) (/ (cbrt (/ U (* J 2))) (cbrt (cos (/ K 2)))))
* [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 (* J 2))) (cbrt (cos (/ K 2))))
* [exit]simplify:  Simplified to (/ (cbrt (/ U (* J 2))) (cbrt (cos (/ K 2))))
* * * * [misc]progress:  [ 50 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (sqrt (cos (/ K 2)))) (/ (cbrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))))))>
* [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 (* J 2))) (sqrt (cos (/ K 2)))) (cbrt (/ U (* J 2))))
* [exit]simplify:  Simplified to (* (/ (cbrt (/ U (* J 2))) (sqrt (cos (/ K 2)))) (cbrt (/ U (* J 2))))
* [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 (* J 2))) (sqrt (cos (/ K 2))))
* [exit]simplify:  Simplified to (/ (cbrt (/ U (* J 2))) (sqrt (cos (/ K 2))))
* * * * [misc]progress:  [ 51 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) 1) (/ (cbrt (/ (/ U 2) J)) (cos (/ K 2)))))))>
* [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 (20 enodes)
* * [misc]simplify:  iters left: 3 (21 enodes)
* [exit]simplify:  Simplified to (/ (cbrt (/ U (* J 2))) (/ 1 (cbrt (/ U (* J 2)))))
* [exit]simplify:  Simplified to (/ (cbrt (/ U (* J 2))) (/ 1 (cbrt (/ U (* J 2)))))
* [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 (* J 2))) (cos (/ K 2)))
* [exit]simplify:  Simplified to (/ (cbrt (/ U (* J 2))) (cos (/ K 2)))
* * * * [misc]progress:  [ 52 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (sqrt (/ (/ U 2) J)) (cbrt (cos (/ K 2))))))))>
* [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 (* J 2))) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2))))
* [exit]simplify:  Simplified to (/ (/ (sqrt (/ U (* J 2))) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2))))
* [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 (* J 2))) (cbrt (cos (/ K 2))))
* [exit]simplify:  Simplified to (/ (sqrt (/ U (* J 2))) (cbrt (cos (/ K 2))))
* * * * [misc]progress:  [ 53 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2)))) (/ (sqrt (/ (/ U 2) J)) (sqrt (cos (/ K 2))))))))>
* [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 (* J 2))) (sqrt (cos (/ K 2))))
* [exit]simplify:  Simplified to (/ (sqrt (/ U (* J 2))) (sqrt (cos (/ K 2))))
* [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 (* J 2))) (sqrt (cos (/ K 2))))
* [exit]simplify:  Simplified to (/ (sqrt (/ U (* J 2))) (sqrt (cos (/ K 2))))
* * * * [misc]progress:  [ 54 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ (sqrt (/ (/ U 2) J)) 1) (/ (sqrt (/ (/ U 2) J)) (cos (/ K 2)))))))>
* [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 (15 enodes)
* [exit]simplify:  Simplified to (/ (sqrt (/ U (* J 2))) 1)
* [exit]simplify:  Simplified to (/ (sqrt (/ U (* J 2))) 1)
* [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 (* J 2))) (cos (/ K 2)))
* [exit]simplify:  Simplified to (/ (sqrt (/ U (* J 2))) (cos (/ K 2)))
* * * * [misc]progress:  [ 55 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ 1 (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ (/ U 2) J) (cbrt (cos (/ K 2))))))))>
* [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))))
* [exit]simplify:  Simplified to (/ (/ 1 (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2))))
* [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 J) 2) (cbrt (cos (/ K 2))))
* [exit]simplify:  Simplified to (/ (/ (/ U J) 2) (cbrt (cos (/ K 2))))
* * * * [misc]progress:  [ 56 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ 1 (sqrt (cos (/ K 2)))) (/ (/ (/ U 2) J) (sqrt (cos (/ K 2))))))))>
* [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))))
* [exit]simplify:  Simplified to (/ 1 (sqrt (cos (/ K 2))))
* [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 J) 2) (sqrt (cos (/ K 2))))
* [exit]simplify:  Simplified to (/ (/ (/ U J) 2) (sqrt (cos (/ K 2))))
* * * * [misc]progress:  [ 57 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ 1 1) (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (/ 1 1)
* * [misc]simplify:  iters left: 2 (2 enodes)
* * [misc]simplify:  iters left: 1 (4 enodes)
* [exit]simplify:  Simplified to 1
* [exit]simplify:  Simplified to 1
* [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 (* J 2)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (cos (/ K 2)))
* * * * [misc]progress:  [ 58 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ (/ U 2) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (/ (/ 1 J) (cbrt (cos (/ K 2))))))))>
* [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))))
* [exit]simplify:  Simplified to (/ (/ (/ U 2) (cbrt (cos (/ K 2)))) (cbrt (cos (/ K 2))))
* [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))))
* [exit]simplify:  Simplified to (/ (/ 1 J) (cbrt (cos (/ K 2))))
* * * * [misc]progress:  [ 59 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ (/ U 2) (sqrt (cos (/ K 2)))) (/ (/ 1 J) (sqrt (cos (/ K 2))))))))>
* [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))))
* [exit]simplify:  Simplified to (/ (/ U 2) (sqrt (cos (/ K 2))))
* [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))))
* [exit]simplify:  Simplified to (/ (/ 1 J) (sqrt (cos (/ K 2))))
* * * * [misc]progress:  [ 60 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ (/ U 2) 1) (/ (/ 1 J) (cos (/ K 2)))))))>
* [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)
* [exit]simplify:  Simplified to (/ U 2)
* [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)))
* [exit]simplify:  Simplified to (/ (/ 1 J) (cos (/ K 2)))
* * * * [misc]progress:  [ 61 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 62 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ (/ U 2) J) (/ 1 (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (/ 1 (cos (/ K 2)))
* * [misc]simplify:  iters left: 5 (6 enodes)
* * [misc]simplify:  iters left: 4 (8 enodes)
* [exit]simplify:  Simplified to (/ 1 (cos (/ K 2)))
* [exit]simplify:  Simplified to (/ 1 (cos (/ K 2)))
* * * * [misc]progress:  [ 63 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ 1 (/ (cos (/ K 2)) (/ (/ U 2) J))))))>
* [enter]simplify:  Simplifying (/ (cos (/ K 2)) (/ (/ U 2) J))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (21 enodes)
* * [misc]simplify:  iters left: 3 (33 enodes)
* * [misc]simplify:  iters left: 2 (52 enodes)
* * [misc]simplify:  iters left: 1 (58 enodes)
* [exit]simplify:  Simplified to (/ (cos (/ K 2)) (/ U (* J 2)))
* [exit]simplify:  Simplified to (/ (cos (/ K 2)) (/ U (* J 2)))
* * * * [misc]progress:  [ 64 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ (/ U 2) J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (/ (/ (/ U 2) J) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (17 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (48 enodes)
* * [misc]simplify:  iters left: 2 (75 enodes)
* * [misc]simplify:  iters left: 1 (90 enodes)
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* [exit]simplify:  Simplified to (/ (/ U (* J 2)) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2)))))
* * * * [misc]progress:  [ 65 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ (/ U 2) J) (sqrt (cos (/ K 2)))) (sqrt (cos (/ K 2)))))))>
* [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 J) 2) (sqrt (cos (/ K 2))))
* [exit]simplify:  Simplified to (/ (/ (/ U J) 2) (sqrt (cos (/ K 2))))
* * * * [misc]progress:  [ 66 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ (/ U 2) J) 1) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (/ (/ (/ U 2) J) 1)
* * [misc]simplify:  iters left: 6 (7 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (16 enodes)
* * [misc]simplify:  iters left: 3 (26 enodes)
* * [misc]simplify:  iters left: 2 (29 enodes)
* * [misc]simplify:  iters left: 1 (33 enodes)
* [exit]simplify:  Simplified to (/ U (* J 2))
* [exit]simplify:  Simplified to (/ U (* J 2))
* * * * [misc]progress:  [ 67 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (* (cbrt (/ (/ U 2) J)) (cbrt (/ (/ U 2) J))) (/ (cos (/ K 2)) (cbrt (/ (/ U 2) J)))))))>
* [enter]simplify:  Simplifying (/ (cos (/ K 2)) (cbrt (/ (/ U 2) J)))
* * [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 (/ (cos (/ K 2)) (cbrt (/ U (* J 2))))
* [exit]simplify:  Simplified to (/ (cos (/ K 2)) (cbrt (/ U (* J 2))))
* * * * [misc]progress:  [ 68 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (sqrt (/ (/ U 2) J)) (/ (cos (/ K 2)) (sqrt (/ (/ U 2) J)))))))>
* [enter]simplify:  Simplifying (/ (cos (/ K 2)) (sqrt (/ (/ U 2) J)))
* * [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 (/ (cos (/ K 2)) (sqrt (/ U (* J 2))))
* [exit]simplify:  Simplified to (/ (cos (/ K 2)) (sqrt (/ U (* J 2))))
* * * * [misc]progress:  [ 69 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ 1 (/ (cos (/ K 2)) (/ (/ U 2) J))))))>
* [enter]simplify:  Simplifying (/ (cos (/ K 2)) (/ (/ U 2) J))
* * [misc]simplify:  iters left: 6 (9 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (21 enodes)
* * [misc]simplify:  iters left: 3 (33 enodes)
* * [misc]simplify:  iters left: 2 (52 enodes)
* * [misc]simplify:  iters left: 1 (58 enodes)
* [exit]simplify:  Simplified to (/ (cos (/ K 2)) (/ U (* J 2)))
* [exit]simplify:  Simplified to (/ (cos (/ K 2)) (/ U (* J 2)))
* * * * [misc]progress:  [ 70 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U 2) (/ (cos (/ K 2)) (/ 1 J))))))>
* [enter]simplify:  Simplifying (/ (cos (/ K 2)) (/ 1 J))
* * [misc]simplify:  iters left: 5 (8 enodes)
* * [misc]simplify:  iters left: 4 (12 enodes)
* * [misc]simplify:  iters left: 3 (15 enodes)
* * [misc]simplify:  iters left: 2 (17 enodes)
* [exit]simplify:  Simplified to (/ (cos (/ K 2)) (/ 1 J))
* [exit]simplify:  Simplified to (/ (cos (/ K 2)) (/ 1 J))
* * * * [misc]progress:  [ 71 / 80 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ U 2) (* (cos (/ K 2)) J)))))>
* [enter]simplify:  Simplifying (* (cos (/ K 2)) J)
* * [misc]simplify:  iters left: 5 (6 enodes)
* * [misc]simplify:  iters left: 4 (7 enodes)
* [exit]simplify:  Simplified to (* (cos (/ K 2)) J)
* [exit]simplify:  Simplified to (* (cos (/ K 2)) J)
* * * * [misc]progress:  [ 72 / 80 ] simplifiying candidate #<alt-event (λ (J K U) 0)>
* [enter]simplify:  Simplifying 0
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 0
* * * * [misc]progress:  [ 73 / 80 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J -2))
* * * * [misc]progress:  [ 74 / 80 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J -2))
* * * * [misc]progress:  [ 75 / 80 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 J) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* (* -2 J) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (36 enodes)
* * [misc]simplify:  iters left: 3 (44 enodes)
* * [misc]simplify:  iters left: 2 (56 enodes)
* * [misc]simplify:  iters left: 1 (57 enodes)
* [exit]simplify:  Simplified to (* (* J -2) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 76 / 80 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 (* (cos (* 1/2 K)) J)) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* (* -2 (* (cos (* 1/2 K)) J)) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (57 enodes)
* * [misc]simplify:  iters left: 3 (81 enodes)
* * [misc]simplify:  iters left: 2 (110 enodes)
* * [misc]simplify:  iters left: 1 (112 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (* K 1/2))) (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 77 / 80 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 (* (cos (* 1/2 K)) J)) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))>
* [enter]simplify:  Simplifying (* (* -2 (* (cos (* 1/2 K)) J)) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (57 enodes)
* * [misc]simplify:  iters left: 3 (81 enodes)
* * [misc]simplify:  iters left: 2 (110 enodes)
* * [misc]simplify:  iters left: 1 (112 enodes)
* [exit]simplify:  Simplified to (* (* (* J -2) (cos (* K 1/2))) (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 78 / 80 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (+ (* 1/16 (/ (* (pow K 2) U) J)) (* 1/2 (/ U J))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (hypot 1 (+ (* 1/16 (/ (* (pow K 2) U) J)) (* 1/2 (/ U J)))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (85 enodes)
* * [misc]simplify:  iters left: 3 (151 enodes)
* * [misc]simplify:  iters left: 2 (224 enodes)
* * [misc]simplify:  iters left: 1 (316 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (* (fma (/ 1/16 J) (* K K) (/ 1/2 J)) U)))
* * * * [misc]progress:  [ 79 / 80 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* 1/2 (/ U (* J (cos (* 1/2 K))))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* 1/2 (/ U (* J (cos (* 1/2 K)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (71 enodes)
* * [misc]simplify:  iters left: 3 (114 enodes)
* * [misc]simplify:  iters left: 2 (142 enodes)
* * [misc]simplify:  iters left: 1 (155 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ U (/ J 1/2)) (cos (* 1/2 K)))))
* * * * [misc]progress:  [ 80 / 80 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* 1/2 (/ U (* J (cos (* 1/2 K))))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* 1/2 (/ U (* J (cos (* 1/2 K)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (71 enodes)
* * [misc]simplify:  iters left: 3 (114 enodes)
* * [misc]simplify:  iters left: 2 (142 enodes)
* * [misc]simplify:  iters left: 1 (155 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ U (/ J 1/2)) (cos (* 1/2 K)))))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 2 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 1 2)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 1)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 2)
* [misc]approximate:  Taking taylor expansion of (sqrt (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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) 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 (* (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]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 (* (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]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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 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]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 2)
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) 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 (* (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]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 (* (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]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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 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]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)
* [misc]approximate:  Taking taylor expansion of (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* J -2) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* J -2) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) into 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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* J -2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 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 (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* J -2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 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]backup-simplify:  Simplify (* 0 -2) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (* 0 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]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 1 -2)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (cos (* 1/2 K)))) into (- (* 2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* 0 (* +nan.0 (/ U (cos (* 1/2 K))))) (* (- (* 2 (cos (* 1/2 K)))) 0)) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 (* +nan.0 (/ U (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]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ U (cos (* 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ U (cos (* 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 0) (+ (* 1 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (+ (* (- (* 2 (cos (* 1/2 K)))) (* +nan.0 (/ U (cos (* 1/2 K))))) (* 0 0))) into (- (* +nan.0 U))
* [misc]backup-simplify:  Simplify (+ (* 0 (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (+ (* 0 (* +nan.0 (/ U (cos (* 1/2 K))))) (* (- (* +nan.0 U)) 0))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]approximate:  Taking taylor expansion of (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in U
* [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 -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in K
* [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 -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 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 (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (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]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 (* (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 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 (* (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]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 (* (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 (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (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]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 (* (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 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 (* (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]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 (* (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]backup-simplify:  Simplify (* 1 -2) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 K))) 1) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 K))) 1) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (* 0 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 1/2 (* (cos (/ 1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 1/2 (* (cos (/ 1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))) into (- (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* (- (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) 1))) into (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (cos (/ 1/2 K)) (pow U 2)) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (exp (* 2 (log U))) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (pow U 2)) into (* (cos (/ 1/2 K)) (pow U 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) into (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) into (/ 1/4 (* (cos (/ 1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (- (/ 1/4 (* (cos (/ 1/2 K)) (pow U 2)))) into (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/4 in U
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (cos (/ 1/2 K)) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]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 (* 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]backup-simplify:  Simplify (- (* 1/4 (/ 1 (cos (/ 1/2 K))))) into (- (* 1/4 (/ 1 (cos (/ 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ 1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ 1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (+ (* 0 (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (+ (* 0 (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* (- (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) 0) (* 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log U))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (pow U 2))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) (/ 0 (* (cos (/ 1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 1))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)) (* 0 (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (/ 1/2 U) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)) (* 0 (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (/ 1/2 U) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) 0) (+ (* 0 0) (* 0 (/ 1/2 (* (cos (/ 1/2 K)) U))))) 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 U 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -1/128 (* (pow (cos (/ 1/2 K)) 4) (pow U 4)))
* [misc]backup-simplify:  Simplify (/ (- (/ -1/128 (* (pow (cos (/ 1/2 K)) 4) (pow U 4))) (pow (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -3/512 (* (pow (cos (/ 1/2 K)) 4) (pow U 4)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 1))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)) (* 0 (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (/ 1/2 U) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 U) (/ 0 U)) (* 0 (/ 0 U)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (/ 1/2 U) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 0 (cos (/ 1/2 K)))) (* 0 (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) 0) (+ (* 0 0) (* 0 (/ 1/2 (* (cos (/ 1/2 K)) U))))) 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 U 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -1/128 (* (pow (cos (/ 1/2 K)) 4) (pow U 4)))
* [misc]backup-simplify:  Simplify (/ (- (/ -1/128 (* (pow (cos (/ 1/2 K)) 4) (pow U 4))) (pow (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -3/512 (* (pow (cos (/ 1/2 K)) 4) (pow U 4)))
* [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 K) (/ 0 K)) (* 0 (/ 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)) (* 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 (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) (/ -3/512 (* (pow (cos (/ 1/2 K)) 4) (pow U 4)))) (+ (* 0 0) (+ (* 0 (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))))) into (* 3/256 (/ 1 (* (pow (cos (/ 1/2 K)) 3) (pow U 4))))
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) (/ -3/512 (* (pow (cos (/ 1/2 K)) 4) (pow U 4)))) (+ (* 0 0) (+ (* (- (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* (* 3/256 (/ 1 (* (pow (cos (/ 1/2 K)) 3) (pow U 4)))) 1))))) into (* 1/64 (/ 1 (* (pow (cos (/ 1/2 K)) 3) (pow U 4))))
* [misc]taylor:  Taking taylor expansion of (* 1/64 (/ 1 (* (pow (cos (/ 1/2 K)) 3) (pow U 4)))) in K
* [misc]taylor:  Taking taylor expansion of 1/64 in K
* [misc]backup-simplify:  Simplify 1/64 into 1/64
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (pow (cos (/ 1/2 K)) 3) (pow U 4))) in K
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ 1/2 K)) 3) (pow U 4)) in K
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 3) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 3 (log (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 3 (log (cos (/ 1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of 3 in K
* [misc]backup-simplify:  Simplify 3 into 3
* [misc]taylor:  Taking taylor expansion of (log (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 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) 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 U 4) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 4 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (* 4 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 4 in K
* [misc]backup-simplify:  Simplify 4 into 4
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 4 (log U)) into (* 4 (log U))
* [misc]backup-simplify:  Simplify (exp (* 4 (log U))) into (pow U 4)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ 1/2 K)) 3) (pow U 4)) into (* (pow (cos (/ 1/2 K)) 3) (pow U 4))
* [misc]backup-simplify:  Simplify (/ 1 (* (pow (cos (/ 1/2 K)) 3) (pow U 4))) into (/ 1 (* (pow (cos (/ 1/2 K)) 3) (pow U 4)))
* [misc]backup-simplify:  Simplify (* 1/64 (/ 1 (* (pow (cos (/ 1/2 K)) 3) (pow U 4)))) into (/ 1/64 (* (pow (cos (/ 1/2 K)) 3) (pow U 4)))
* [misc]taylor:  Taking taylor expansion of (/ 1/64 (* (pow (cos (/ 1/2 K)) 3) (pow U 4))) in U
* [misc]taylor:  Taking taylor expansion of 1/64 in U
* [misc]backup-simplify:  Simplify 1/64 into 1/64
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ 1/2 K)) 3) (pow U 4)) in U
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 3) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 3 (log (cos (/ 1/2 K))))) in U
* [misc]taylor:  Taking taylor expansion of (* 3 (log (cos (/ 1/2 K)))) in U
* [misc]taylor:  Taking taylor expansion of 3 in U
* [misc]backup-simplify:  Simplify 3 into 3
* [misc]taylor:  Taking taylor expansion of (log (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]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 U 4) in U
* [misc]backup-simplify:  Simplify (* (pow (cos (/ 1/2 K)) 3) 1) into (pow (cos (/ 1/2 K)) 3)
* [misc]backup-simplify:  Simplify (/ 1/64 (pow (cos (/ 1/2 K)) 3)) into (/ 1/64 (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 (/ (+ (* 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 (+ (* -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 (+ (* 3 0) (+ (* 0 0) (* 0 (log (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 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)) 3) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (cos (/ 1/2 K)) 3) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 3)) (+ (* (/ 1/64 (pow (cos (/ 1/2 K)) 3)) (/ 0 (pow (cos (/ 1/2 K)) 3))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (pow (cos (/ 1/2 K)) 3)) (+ (* (/ 1/64 (pow (cos (/ 1/2 K)) 3)) (/ 0 (pow (cos (/ 1/2 K)) 3))) (* 0 (/ 0 (pow (cos (/ 1/2 K)) 3))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log U))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 (pow U 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) (/ 0 (* (cos (/ 1/2 K)) (pow U 2)))) (* 0 (/ 0 (* (cos (/ 1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (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/4 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 (/ 1 K)))) (* 1 (* 1 (/ 1 (/ 1 J))))) (* (- (* 1/4 (/ 1 (cos (/ 1/2 (/ 1 K)))))) (* (pow (/ 1 U) -2) (* 1 (/ 1 J))))) into (- (+ (* 1/4 (/ (pow U 2) (* J (cos (* 1/2 K))))) (* 2 (* (cos (* 1/2 K)) J))))
* [misc]approximate:  Taking taylor expansion of (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in U
* [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 -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in K
* [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 -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into 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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 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 (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 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]backup-simplify:  Simplify (* -1 -2) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 K))) 1) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 K))) 1) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (* 0 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))) into (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) 1))) into (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (exp (* 2 (log U))) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (pow U 2)) into (* (cos (/ -1/2 K)) (pow U 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) into (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) into (/ 1/4 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (* (cos (/ -1/2 K)) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of 1/4 in U
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]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/4 (cos (/ -1/2 K))) into (/ 1/4 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ 1/4 (cos (/ -1/2 K))) into (/ 1/4 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (cos (/ -1/2 K)) U)) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ -1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (cos (/ -1/2 K)) U)) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ -1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (+ (* 0 (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (+ (* 0 (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) 0) (* 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log U))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (pow U 2))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) (/ 0 (* (cos (/ -1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/4 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 1))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))) (* 0 (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) 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 -1) (+ (* (/ 1/2 U) (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))) (* 0 (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) 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 -1) (+ (* (/ 1/2 U) (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) 0) (+ (* 0 0) (* 0 (/ 1/2 (* (cos (/ -1/2 K)) U))))) 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 U 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -1/128 (* (pow (cos (/ -1/2 K)) 4) (pow U 4)))
* [misc]backup-simplify:  Simplify (/ (- (/ -1/128 (* (pow (cos (/ -1/2 K)) 4) (pow U 4))) (pow (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -3/512 (* (pow (cos (/ -1/2 K)) 4) (pow U 4)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 1))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))) (* 0 (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) 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 -1) (+ (* (/ 1/2 U) (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- U) into (- U)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 U) (/ 0 (- U))) (* 0 (/ 0 (- U))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) 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 -1) (+ (* (/ 1/2 U) (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) 0) (+ (* 0 0) (* 0 (/ 1/2 (* (cos (/ -1/2 K)) U))))) 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 U 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -1/128 (* (pow (cos (/ -1/2 K)) 4) (pow U 4)))
* [misc]backup-simplify:  Simplify (/ (- (/ -1/128 (* (pow (cos (/ -1/2 K)) 4) (pow U 4))) (pow (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) 2) (+ (* 2 (* 0 0)))) (* 2 1)) into (/ -3/512 (* (pow (cos (/ -1/2 K)) 4) (pow U 4)))
* [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) 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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 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)) (* 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 (- 0) into 0
* [misc]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 (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) (/ -3/512 (* (pow (cos (/ -1/2 K)) 4) (pow U 4)))) (+ (* 0 0) (+ (* 0 (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))))) into (- (* 3/256 (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4)))))
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) (/ -3/512 (* (pow (cos (/ -1/2 K)) 4) (pow U 4)))) (+ (* 0 0) (+ (* (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* (- (* 3/256 (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4))))) 1))))) into (- (* 1/64 (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/64 (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/64 (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4)))) in K
* [misc]taylor:  Taking taylor expansion of 1/64 in K
* [misc]backup-simplify:  Simplify 1/64 into 1/64
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4))) in K
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ -1/2 K)) 3) (pow U 4)) in K
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 3) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 3 (log (cos (/ -1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 3 (log (cos (/ -1/2 K)))) in K
* [misc]taylor:  Taking taylor expansion of 3 in K
* [misc]backup-simplify:  Simplify 3 into 3
* [misc]taylor:  Taking taylor expansion of (log (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 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) 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 U 4) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 4 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (* 4 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 4 in K
* [misc]backup-simplify:  Simplify 4 into 4
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 4 (log U)) into (* 4 (log U))
* [misc]backup-simplify:  Simplify (exp (* 4 (log U))) into (pow U 4)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ -1/2 K)) 3) (pow U 4)) into (* (pow (cos (/ -1/2 K)) 3) (pow U 4))
* [misc]backup-simplify:  Simplify (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4))) into (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4)))
* [misc]backup-simplify:  Simplify (* 1/64 (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4)))) into (/ 1/64 (* (pow (cos (/ -1/2 K)) 3) (pow U 4)))
* [misc]backup-simplify:  Simplify (- (/ 1/64 (* (pow (cos (/ -1/2 K)) 3) (pow U 4)))) into (- (* 1/64 (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/64 (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/64 (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4)))) in U
* [misc]taylor:  Taking taylor expansion of 1/64 in U
* [misc]backup-simplify:  Simplify 1/64 into 1/64
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow U 4))) in U
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ -1/2 K)) 3) (pow U 4)) in U
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 3) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 3 (log (cos (/ -1/2 K))))) in U
* [misc]taylor:  Taking taylor expansion of (* 3 (log (cos (/ -1/2 K)))) in U
* [misc]taylor:  Taking taylor expansion of 3 in U
* [misc]backup-simplify:  Simplify 3 into 3
* [misc]taylor:  Taking taylor expansion of (log (cos (/ -1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]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 U 4) in U
* [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 (- (/ 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 (+ (* 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 (+ (* -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 (+ (* 3 0) (+ (* 0 0) (* 0 (log (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 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)) 3) 0) (+ (* 0 0) (* 0 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 (pow (cos (/ -1/2 K)) 3)) (/ 0 (pow (cos (/ -1/2 K)) 3))) (* 0 (/ 0 (pow (cos (/ -1/2 K)) 3))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/64 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (/ -1/2 K)) 3))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow U 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow U 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log U)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log U))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 (pow U 2)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) (/ 0 (* (cos (/ -1/2 K)) (pow U 2)))) (* 0 (/ 0 (* (cos (/ -1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (+ (* 0 0) (* 0 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/4 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* 1 (/ 1 (/ 1 (- J)))))) (* (/ 1/4 (cos (/ -1/2 (/ 1 (- K))))) (* (pow (/ 1 (- U)) -2) (* 1 (/ 1 (- J)))))) into (- (+ (* 1/4 (/ (pow U 2) (* J (cos (* 1/2 K))))) (* 2 (* (cos (* 1/2 K)) J))))
* * * * [misc]progress:  [ 4 / 4 ] generating series at (2 1)
* [misc]approximate:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* J -2) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* J -2) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* J -2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* J -2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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]backup-simplify:  Simplify (* 0 -2) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (* 0 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 1 -2)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (cos (* 1/2 K)))) into (- (* 2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* 0 (* +nan.0 (/ U (cos (* 1/2 K))))) (* (- (* 2 (cos (* 1/2 K)))) 0)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ U (cos (* 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 0) (+ (* 1 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (+ (* (- (* 2 (cos (* 1/2 K)))) (* +nan.0 (/ U (cos (* 1/2 K))))) (* 0 0))) into (- (* +nan.0 U))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 U)) in K
* [misc]taylor:  Taking taylor expansion of (* +nan.0 U) 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 U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (* +nan.0 U) into (* +nan.0 U)
* [misc]backup-simplify:  Simplify (- (* +nan.0 U)) into (- (* +nan.0 U))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 U)) in U
* [misc]taylor:  Taking taylor expansion of (* +nan.0 U) in U
* [misc]taylor:  Taking taylor expansion of +nan.0 in U
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [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 (* +nan.0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]approximate:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in U
* [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 -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in K
* [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 -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (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]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 (* (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 (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (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]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 (* (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]backup-simplify:  Simplify (* 1 -2) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 K))) 1) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (* 0 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 1/2 (* (cos (/ 1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))) into (- (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) 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)) (pow U 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (cos (/ 1/2 K)) (pow U 2)) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (exp (* 2 (log U))) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (pow U 2)) into (* (cos (/ 1/2 K)) (pow U 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) into (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) into (/ 1/8 (* (cos (/ 1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (- (/ 1/8 (* (cos (/ 1/2 K)) (pow U 2)))) into (- (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/8 in U
* [misc]backup-simplify:  Simplify 1/8 into 1/8
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (cos (/ 1/2 K)) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]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 (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 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]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ 1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (+ (* 0 (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log U))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (pow U 2))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) (/ 0 (* (cos (/ 1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/8 0) (* 0 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (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]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 (/ 1 K)))) (* 1 (* 1 (/ 1 (/ 1 J))))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in U
* [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 -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in K
* [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 -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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]backup-simplify:  Simplify (* -1 -2) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 K))) 1) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (* 0 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))) into (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))
* [misc]taylor:  Taking taylor expansion of (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) 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)) (pow U 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (exp (* 2 (log U))) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (pow U 2)) into (* (cos (/ -1/2 K)) (pow U 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) into (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) into (/ 1/8 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/8 (* (cos (/ -1/2 K)) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of 1/8 in U
* [misc]backup-simplify:  Simplify 1/8 into 1/8
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]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/8 (cos (/ -1/2 K))) into (/ 1/8 (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 (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/8 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (cos (/ -1/2 K)) U)) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ -1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (+ (* 0 (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log U))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (pow U 2))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) (/ 0 (* (cos (/ -1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/8 0) (* 0 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/8 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* 1 (/ 1 (/ 1 (- J)))))) into (* -2 (* (cos (* 1/2 K)) J))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log1p (expm1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (expm1 (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 (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 2 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (expm1 (log1p (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (log1p (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 (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 3 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1/2)))>
* * * * [misc]progress:  [ 4 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (pow (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1)))>
* * * * [misc]progress:  [ 5 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (exp (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (log (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 (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 6 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (exp (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 7 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))>
* [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 (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 8 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))>
* [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))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (30 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (49 enodes)
* * [misc]simplify:  iters left: 1 (50 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 9 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))>
* [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))))))
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (sqrt (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 (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 10 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 11 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [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 (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 12 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 13 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (fabs (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* * * * [misc]progress:  [ 14 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* 1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* * * * [misc]progress:  [ 15 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (log1p (expm1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (expm1 (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 (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 16 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (expm1 (log1p (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (log1p (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 (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 17 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1/2)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 18 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (pow (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 19 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (exp (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (log (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 (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 20 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (log (exp (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 21 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (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)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [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 (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 22 / 89 ] simplifiying candidate #<alt-delta (λ (J K 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)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [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))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (30 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (49 enodes)
* * [misc]simplify:  iters left: 1 (50 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 23 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (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)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [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))))))
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (sqrt (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 (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 24 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (* (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)))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 25 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (* (sqrt 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [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 (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 26 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (* (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)))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 27 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (fabs (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 28 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (* 1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 29 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (log1p (expm1 (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (expm1 (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (68 enodes)
* * [misc]simplify:  iters left: 3 (125 enodes)
* * [misc]simplify:  iters left: 2 (196 enodes)
* * [misc]simplify:  iters left: 1 (199 enodes)
* [exit]simplify:  Simplified to (expm1 (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (expm1 (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 30 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (expm1 (log1p (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (log1p (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (68 enodes)
* * [misc]simplify:  iters left: 3 (125 enodes)
* * [misc]simplify:  iters left: 2 (196 enodes)
* * [misc]simplify:  iters left: 1 (199 enodes)
* [exit]simplify:  Simplified to (log1p (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (log1p (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 31 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (125 enodes)
* * [misc]simplify:  iters left: 2 (204 enodes)
* * [misc]simplify:  iters left: 1 (207 enodes)
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* * * * [misc]progress:  [ 32 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (125 enodes)
* * [misc]simplify:  iters left: 2 (204 enodes)
* * [misc]simplify:  iters left: 1 (207 enodes)
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* * * * [misc]progress:  [ 33 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (125 enodes)
* * [misc]simplify:  iters left: 2 (204 enodes)
* * [misc]simplify:  iters left: 1 (207 enodes)
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))
* * * * [misc]progress:  [ 34 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1))>
* * * * [misc]progress:  [ 35 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (+ (+ (log (* J -2)) (log (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (+ (+ (+ (log (* J -2)) (log (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [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 (118 enodes)
* * [misc]simplify:  iters left: 2 (211 enodes)
* * [misc]simplify:  iters left: 1 (246 enodes)
* [exit]simplify:  Simplified to (+ (+ (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))))
* [exit]simplify:  Simplified to (+ (+ (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]progress:  [ 36 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (+ (log (* (* J -2) (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (+ (+ (log (* (* J -2) (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [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 (95 enodes)
* * [misc]simplify:  iters left: 2 (163 enodes)
* * [misc]simplify:  iters left: 1 (210 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 (* (* -2 J) (cos (/ K 2))))))
* [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 (* (* -2 J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 37 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (log (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (+ (log (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [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 (134 enodes)
* * [misc]simplify:  iters left: 2 (214 enodes)
* * [misc]simplify:  iters left: 1 (263 enodes)
* [exit]simplify:  Simplified to (+ (log (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2)))) (log (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* -2 J))))
* [exit]simplify:  Simplified to (+ (log (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2)))) (log (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* -2 J))))
* * * * [misc]progress:  [ 38 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (log (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (log (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (78 enodes)
* * [misc]simplify:  iters left: 3 (173 enodes)
* * [misc]simplify:  iters left: 2 (334 enodes)
* * [misc]simplify:  iters left: 1 (425 enodes)
* [exit]simplify:  Simplified to (log (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 39 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (log (exp (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (exp (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (36 enodes)
* * [misc]simplify:  iters left: 4 (76 enodes)
* * [misc]simplify:  iters left: 3 (147 enodes)
* * [misc]simplify:  iters left: 2 (231 enodes)
* * [misc]simplify:  iters left: 1 (267 enodes)
* [exit]simplify:  Simplified to (exp (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (exp (* (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 40 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (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)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (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)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (189 enodes)
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* (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))))))
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* (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))))))
* * * * [misc]progress:  [ 41 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (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)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (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)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (49 enodes)
* * [misc]simplify:  iters left: 4 (159 enodes)
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* -2 J) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* -2 J) (cos (/ K 2))) 3)) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 42 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (* J -2) (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)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (* J -2) (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)))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (140 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))))))
* [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]progress:  [ 43 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (cbrt (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (cbrt (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (35 enodes)
* * [misc]simplify:  iters left: 4 (69 enodes)
* * [misc]simplify:  iters left: 3 (129 enodes)
* * [misc]simplify:  iters left: 2 (206 enodes)
* * [misc]simplify:  iters left: 1 (219 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (cbrt (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (68 enodes)
* * [misc]simplify:  iters left: 3 (125 enodes)
* * [misc]simplify:  iters left: 2 (196 enodes)
* * [misc]simplify:  iters left: 1 (199 enodes)
* [exit]simplify:  Simplified to (cbrt (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (cbrt (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 44 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (105 enodes)
* * [misc]simplify:  iters left: 3 (416 enodes)
* [exit]simplify:  Simplified to (pow (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)
* [exit]simplify:  Simplified to (pow (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) 3)
* * * * [misc]progress:  [ 45 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (sqrt (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (sqrt (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (68 enodes)
* * [misc]simplify:  iters left: 3 (125 enodes)
* * [misc]simplify:  iters left: 2 (196 enodes)
* * [misc]simplify:  iters left: 1 (199 enodes)
* [exit]simplify:  Simplified to (sqrt (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [enter]simplify:  Simplifying (sqrt (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (68 enodes)
* * [misc]simplify:  iters left: 3 (125 enodes)
* * [misc]simplify:  iters left: 2 (196 enodes)
* * [misc]simplify:  iters left: 1 (199 enodes)
* [exit]simplify:  Simplified to (sqrt (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 46 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* 1 (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* * * * [misc]progress:  [ 47 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (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))))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (86 enodes)
* * [misc]simplify:  iters left: 3 (236 enodes)
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 48 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (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))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (77 enodes)
* * [misc]simplify:  iters left: 3 (169 enodes)
* * [misc]simplify:  iters left: 2 (300 enodes)
* * [misc]simplify:  iters left: 1 (325 enodes)
* [exit]simplify:  Simplified to (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 49 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (74 enodes)
* * [misc]simplify:  iters left: 3 (152 enodes)
* * [misc]simplify:  iters left: 2 (297 enodes)
* * [misc]simplify:  iters left: 1 (329 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 50 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt 1)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt 1))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (74 enodes)
* * [misc]simplify:  iters left: 3 (152 enodes)
* * [misc]simplify:  iters left: 2 (297 enodes)
* * [misc]simplify:  iters left: 1 (329 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (* (sqrt 1) (* -2 J)) (cos (/ K 2))))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (* (sqrt 1) (* -2 J)) (cos (/ K 2))))
* * * * [misc]progress:  [ 51 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (34 enodes)
* * [misc]simplify:  iters left: 4 (74 enodes)
* * [misc]simplify:  iters left: 3 (152 enodes)
* * [misc]simplify:  iters left: 2 (297 enodes)
* * [misc]simplify:  iters left: 1 (329 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 52 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1)
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (64 enodes)
* * [misc]simplify:  iters left: 3 (123 enodes)
* * [misc]simplify:  iters left: 2 (234 enodes)
* * [misc]simplify:  iters left: 1 (336 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))
* * * * [misc]progress:  [ 53 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (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 (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 (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 54 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* * * * [misc]progress:  [ 55 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (log1p (expm1 (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (expm1 (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (54 enodes)
* * [misc]simplify:  iters left: 3 (83 enodes)
* * [misc]simplify:  iters left: 2 (106 enodes)
* * [misc]simplify:  iters left: 1 (107 enodes)
* [exit]simplify:  Simplified to (expm1 (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (expm1 (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 56 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (expm1 (log1p (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (log1p (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (54 enodes)
* * [misc]simplify:  iters left: 3 (83 enodes)
* * [misc]simplify:  iters left: 2 (106 enodes)
* * [misc]simplify:  iters left: 1 (107 enodes)
* [exit]simplify:  Simplified to (log1p (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (log1p (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 57 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (pow (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (81 enodes)
* * [misc]simplify:  iters left: 2 (104 enodes)
* * [misc]simplify:  iters left: 1 (105 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 58 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (pow (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [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 (81 enodes)
* * [misc]simplify:  iters left: 2 (104 enodes)
* * [misc]simplify:  iters left: 1 (105 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 59 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (pow (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 60 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (exp (+ (+ (log (* J -2)) (log (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (+ (+ (log (* J -2)) (log (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [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 (83 enodes)
* * [misc]simplify:  iters left: 2 (116 enodes)
* * [misc]simplify:  iters left: 1 (119 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (cos (/ K 2))) (log (* -2 J))) (log (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (+ (+ (log (cos (/ K 2))) (log (* -2 J))) (log (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 61 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (exp (+ (log (* (* J -2) (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (+ (log (* (* J -2) (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [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 (82 enodes)
* * [misc]simplify:  iters left: 2 (117 enodes)
* * [misc]simplify:  iters left: 1 (128 enodes)
* [exit]simplify:  Simplified to (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 62 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (exp (log (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (log (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (65 enodes)
* * [misc]simplify:  iters left: 3 (126 enodes)
* * [misc]simplify:  iters left: 2 (193 enodes)
* * [misc]simplify:  iters left: 1 (198 enodes)
* [exit]simplify:  Simplified to (log (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (log (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 63 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (log (exp (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (exp (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (62 enodes)
* * [misc]simplify:  iters left: 3 (95 enodes)
* * [misc]simplify:  iters left: 2 (118 enodes)
* * [misc]simplify:  iters left: 1 (119 enodes)
* [exit]simplify:  Simplified to (pow (pow (exp (* -2 J)) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (pow (pow (exp (* -2 J)) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 64 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (cbrt (* (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (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)))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (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)))))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (48 enodes)
* * [misc]simplify:  iters left: 4 (149 enodes)
* [exit]simplify:  Simplified to (* (sqrt (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)) (pow (* -2 J) 3)))))
* [exit]simplify:  Simplified to (* (sqrt (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)) (pow (* -2 J) 3)))))
* * * * [misc]progress:  [ 65 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (cbrt (* (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (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)))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (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)))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (43 enodes)
* * [misc]simplify:  iters left: 4 (121 enodes)
* * [misc]simplify:  iters left: 3 (444 enodes)
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* -2 J) (cos (/ K 2))) 3)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (pow (* (* -2 J) (cos (/ K 2))) 3)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 66 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (55 enodes)
* * [misc]simplify:  iters left: 3 (84 enodes)
* * [misc]simplify:  iters left: 2 (107 enodes)
* * [misc]simplify:  iters left: 1 (108 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* [enter]simplify:  Simplifying (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (54 enodes)
* * [misc]simplify:  iters left: 3 (83 enodes)
* * [misc]simplify:  iters left: 2 (106 enodes)
* * [misc]simplify:  iters left: 1 (107 enodes)
* [exit]simplify:  Simplified to (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (cbrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 67 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (cbrt (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (95 enodes)
* * [misc]simplify:  iters left: 3 (355 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (pow (* (* -2 J) (cos (/ K 2))) 3)))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (pow (* (* -2 J) (cos (/ K 2))) 3)))
* * * * [misc]progress:  [ 68 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (54 enodes)
* * [misc]simplify:  iters left: 3 (83 enodes)
* * [misc]simplify:  iters left: 2 (106 enodes)
* * [misc]simplify:  iters left: 1 (107 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (54 enodes)
* * [misc]simplify:  iters left: 3 (83 enodes)
* * [misc]simplify:  iters left: 2 (106 enodes)
* * [misc]simplify:  iters left: 1 (107 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (sqrt (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 69 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* 1 (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 70 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (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))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (* (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 (18 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (66 enodes)
* * [misc]simplify:  iters left: 3 (125 enodes)
* * [misc]simplify:  iters left: 2 (202 enodes)
* * [misc]simplify:  iters left: 1 (240 enodes)
* [exit]simplify:  Simplified to (* (* -2 (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (* (* J (cos (/ K 2))) (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (* -2 (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (* (* J (cos (/ K 2))) (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 71 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (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))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (32 enodes)
* * [misc]simplify:  iters left: 4 (56 enodes)
* * [misc]simplify:  iters left: 3 (85 enodes)
* * [misc]simplify:  iters left: 2 (108 enodes)
* * [misc]simplify:  iters left: 1 (109 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 72 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (54 enodes)
* * [misc]simplify:  iters left: 3 (83 enodes)
* * [misc]simplify:  iters left: 2 (106 enodes)
* * [misc]simplify:  iters left: 1 (107 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 73 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt 1)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (sqrt 1))
* * [misc]simplify:  iters left: 6 (11 enodes)
* * [misc]simplify:  iters left: 5 (20 enodes)
* * [misc]simplify:  iters left: 4 (40 enodes)
* * [misc]simplify:  iters left: 3 (66 enodes)
* * [misc]simplify:  iters left: 2 (82 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt 1) (* -2 J)) (cos (/ K 2)))
* [exit]simplify:  Simplified to (* (* (sqrt 1) (* -2 J)) (cos (/ K 2)))
* * * * [misc]progress:  [ 74 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (30 enodes)
* * [misc]simplify:  iters left: 4 (54 enodes)
* * [misc]simplify:  iters left: 3 (83 enodes)
* * [misc]simplify:  iters left: 2 (106 enodes)
* * [misc]simplify:  iters left: 1 (107 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 75 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) 1)
* * [misc]simplify:  iters left: 6 (10 enodes)
* * [misc]simplify:  iters left: 5 (19 enodes)
* * [misc]simplify:  iters left: 4 (34 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (58 enodes)
* * [misc]simplify:  iters left: 1 (60 enodes)
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (* -2 J))
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (* -2 J))
* * * * [misc]progress:  [ 76 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* J -2) (* (cos (/ K 2)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (cos (/ K 2)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (13 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 (* (cos (/ K 2)) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (cos (/ K 2)) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 77 / 89 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* J -2) (cos (/ K 2)))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 78 / 89 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1)
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (64 enodes)
* * [misc]simplify:  iters left: 3 (123 enodes)
* * [misc]simplify:  iters left: 2 (234 enodes)
* * [misc]simplify:  iters left: 1 (336 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))
* * * * [misc]progress:  [ 79 / 89 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (/ +nan.0 (* (cos (* 1/2 K)) J))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (/ +nan.0 (* (cos (* 1/2 K)) J)))
* * * * [misc]progress:  [ 80 / 89 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (/ +nan.0 (* (cos (* 1/2 K)) J))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (/ +nan.0 (* (cos (* 1/2 K)) J)))
* * * * [misc]progress:  [ 81 / 89 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (61 enodes)
* * [misc]simplify:  iters left: 3 (108 enodes)
* * [misc]simplify:  iters left: 2 (199 enodes)
* * [misc]simplify:  iters left: 1 (261 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))
* * * * [misc]progress:  [ 82 / 89 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 83 / 89 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 84 / 89 ] simplifiying candidate #<alt-event (λ (J K U) 0)>
* [enter]simplify:  Simplifying 0
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 0
* * * * [misc]progress:  [ 85 / 89 ] simplifiying candidate #<alt-event (λ (J K U) (- (+ (* 1/4 (/ (pow U 2) (* J (cos (* 1/2 K))))) (* 2 (* (cos (* 1/2 K)) J)))))>
* [enter]simplify:  Simplifying (- (+ (* 1/4 (/ (pow U 2) (* J (cos (* 1/2 K))))) (* 2 (* (cos (* 1/2 K)) J))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (89 enodes)
* * [misc]simplify:  iters left: 3 (227 enodes)
* * [misc]simplify:  iters left: 2 (479 enodes)
* [exit]simplify:  Simplified to (- (* (* (- J) 2) (cos (* K 1/2))) (/ (* (/ U J) (* U 1/4)) (cos (* K 1/2))))
* * * * [misc]progress:  [ 86 / 89 ] simplifiying candidate #<alt-event (λ (J K U) (- (+ (* 1/4 (/ (pow U 2) (* J (cos (* 1/2 K))))) (* 2 (* (cos (* 1/2 K)) J)))))>
* [enter]simplify:  Simplifying (- (+ (* 1/4 (/ (pow U 2) (* J (cos (* 1/2 K))))) (* 2 (* (cos (* 1/2 K)) J))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (31 enodes)
* * [misc]simplify:  iters left: 4 (89 enodes)
* * [misc]simplify:  iters left: 3 (227 enodes)
* * [misc]simplify:  iters left: 2 (479 enodes)
* [exit]simplify:  Simplified to (- (* (* (- J) 2) (cos (* K 1/2))) (/ (* (/ U J) (* U 1/4)) (cos (* K 1/2))))
* * * * [misc]progress:  [ 87 / 89 ] simplifiying candidate #<alt-event (λ (J K U) (* 0 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* 0 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (14 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 0
* * * * [misc]progress:  [ 88 / 89 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 (* (cos (* 1/2 K)) J)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* -2 (* (cos (* 1/2 K)) J)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (58 enodes)
* * [misc]simplify:  iters left: 3 (83 enodes)
* * [misc]simplify:  iters left: 2 (114 enodes)
* * [misc]simplify:  iters left: 1 (116 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (* K 1/2)) (* J -2)))
* * * * [misc]progress:  [ 89 / 89 ] simplifiying candidate #<alt-event (λ (J K U) (* (* -2 (* (cos (* 1/2 K)) J)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* [enter]simplify:  Simplifying (* (* -2 (* (cos (* 1/2 K)) J)) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (58 enodes)
* * [misc]simplify:  iters left: 3 (83 enodes)
* * [misc]simplify:  iters left: 2 (114 enodes)
* * [misc]simplify:  iters left: 1 (116 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (* K 1/2)) (* J -2)))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 3 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2 1)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 1 2 1)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 1 1 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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) 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 (* (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]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 (* (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]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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 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]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 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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) 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 (* (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]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 (* (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]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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 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]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 1 1 2)
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) 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 (* (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]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 (* (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]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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 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]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:  [ 4 / 4 ] generating series at (2)
* [misc]approximate:  Taking taylor expansion of (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in U
* [misc]taylor:  Taking taylor expansion of (* J -2) in U
* [misc]taylor:  Taking taylor expansion of J in U
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ K 2) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in K
* [misc]taylor:  Taking taylor expansion of (* J -2) in K
* [misc]taylor:  Taking taylor expansion of J in K
* [misc]backup-simplify:  Simplify J into J
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ K 2) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* J -2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))) into (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ U (cos (* 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (/ (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))) into (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ U (cos (* 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (/ (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* J -2) (cos (/ K 2))) in J
* [misc]taylor:  Taking taylor expansion of (* J -2) in J
* [misc]taylor:  Taking taylor expansion of J in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]taylor:  Taking taylor expansion of -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ K 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ K 2) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ K 2) into (* 1/2 K)
* [misc]backup-simplify:  Simplify (cos (* 1/2 K)) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (sin (* 1/2 K)) into (sin (* 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))) into (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ U (cos (* 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (/ (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))) into (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ U (cos (* 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (/ (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]backup-simplify:  Simplify (* 0 -2) into 0
* [misc]backup-simplify:  Simplify (* (cos (* 1/2 K)) 1) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (* 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (* 1/2 K)) 0) into (cos (* 1/2 K))
* [misc]backup-simplify:  Simplify (* 0 (cos (* 1/2 K))) into 0
* [misc]backup-simplify:  Simplify (* 0 0) into 0
* [misc]backup-simplify:  Simplify (* 0 (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (* 0 (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (* 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* 1 -2)) into -2
* [misc]backup-simplify:  Simplify (+ (* 0 0) (* -2 (cos (* 1/2 K)))) into (- (* 2 (cos (* 1/2 K))))
* [misc]backup-simplify:  Simplify (+ (* 0 (* +nan.0 (/ U (cos (* 1/2 K))))) (* (- (* 2 (cos (* 1/2 K)))) 0)) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))) (* 0 (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))) (* 0 (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ U (cos (* 1/2 K)))))) into (/ (cos (* 1/2 K)) U)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (* 1/2 K)) U) (+ (* 2 (* (* +nan.0 (/ U (cos (* 1/2 K)))) (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (* 1/2 K)) U) (* +nan.0 (/ (pow U 3) (pow (cos (* 1/2 K)) 3)))))
* [misc]backup-simplify:  Simplify (/ (- (* +nan.0 (- (/ (cos (* 1/2 K)) U) (* +nan.0 (/ (pow U 3) (pow (cos (* 1/2 K)) 3))))) (pow (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) 2) (+)) (* 2 (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0)))) into (* -1/2 (* (sqrt (/ (cos (* 1/2 K)) U)) (/ (+ (* +nan.0 (/ (pow U 3) (* (pow (cos (* 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (cos (* 1/2 K)) U)) (- (* +nan.0 (/ (pow U 3) (pow (cos (* 1/2 K)) 3))))))) (sqrt +nan.0))))
* [misc]backup-simplify:  Simplify (* 1 1) into 1
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (* 1/2 U) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 1) (+ (* (* 1/2 U) (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 (/ U (cos (* 1/2 K)))) (/ 0 (cos (* 1/2 K)))) (* 0 (/ 0 (cos (* 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 1/2 (/ U (cos (* 1/2 K)))) 0) (+ (* 0 0) (* 0 (* 1/2 (/ U (cos (* 1/2 K))))))) into 0
* [misc]backup-simplify:  Simplify (+ 1 0) into 1
* [misc]backup-simplify:  Simplify (/ (- 1 (pow 0 2) (+)) (* 2 (* 1/2 (/ U (cos (* 1/2 K)))))) into (/ (cos (* 1/2 K)) U)
* [misc]backup-simplify:  Simplify (/ (- (/ (cos (* 1/2 K)) U) (+ (* 2 (* (* +nan.0 (/ U (cos (* 1/2 K)))) (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))))))) (* 2 0)) into (* +nan.0 (- (/ (cos (* 1/2 K)) U) (* +nan.0 (/ (pow U 3) (pow (cos (* 1/2 K)) 3)))))
* [misc]backup-simplify:  Simplify (/ (- (* +nan.0 (- (/ (cos (* 1/2 K)) U) (* +nan.0 (/ (pow U 3) (pow (cos (* 1/2 K)) 3))))) (pow (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) 2) (+)) (* 2 (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0)))) into (* -1/2 (* (sqrt (/ (cos (* 1/2 K)) U)) (/ (+ (* +nan.0 (/ (pow U 3) (* (pow (cos (* 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (cos (* 1/2 K)) U)) (- (* +nan.0 (/ (pow U 3) (pow (cos (* 1/2 K)) 3))))))) (sqrt +nan.0))))
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ U (cos (* 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (* 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 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 0) (+ (* 1 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 0) (+ (* -2 0) (* 0 (cos (* 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 0 (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))) (+ (* (- (* 2 (cos (* 1/2 K)))) (* +nan.0 (/ U (cos (* 1/2 K))))) (* 0 0))) into (- (* +nan.0 U))
* [misc]backup-simplify:  Simplify (+ (* 0 (* -1/2 (* (sqrt (/ (cos (* 1/2 K)) U)) (/ (+ (* +nan.0 (/ (pow U 3) (* (pow (cos (* 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (cos (* 1/2 K)) U)) (- (* +nan.0 (/ (pow U 3) (pow (cos (* 1/2 K)) 3))))))) (sqrt +nan.0))))) (+ (* 0 (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))) (* (- (* +nan.0 U)) (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0))))) into (- (* +nan.0 (* (sqrt (/ (pow U 3) (cos (* 1/2 K)))) (sqrt +nan.0))))
* [misc]backup-simplify:  Simplify (+ (* 0 (* -1/2 (* (sqrt (/ (cos (* 1/2 K)) U)) (/ (+ (* +nan.0 (/ (pow U 3) (* (pow (cos (* 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (cos (* 1/2 K)) U)) (- (* +nan.0 (/ (pow U 3) (pow (cos (* 1/2 K)) 3))))))) (sqrt +nan.0))))) (+ (* 0 (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))) (* (- (* +nan.0 (* (sqrt (/ (pow U 3) (cos (* 1/2 K)))) (sqrt +nan.0)))) (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0))))) into (- (* +nan.0 (/ (* (pow (sqrt +nan.0) 2) (pow U 2)) (cos (* 1/2 K)))))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ (* (pow (sqrt +nan.0) 2) (pow U 2)) (cos (* 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (* (pow (sqrt +nan.0) 2) (pow U 2)) (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 (/ (* (pow (sqrt +nan.0) 2) (pow U 2)) (cos (* 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (* (pow (sqrt +nan.0) 2) (pow U 2)) in K
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (sqrt +nan.0)) in K
* [misc]taylor:  Taking taylor expansion of (sqrt +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 (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 2)
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (exp (* 2 (log U))) into (pow U 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 (* (pow (sqrt +nan.0) 2) (pow U 2)) into (* (pow (sqrt +nan.0) 2) (pow U 2))
* [misc]backup-simplify:  Simplify (/ (* (pow (sqrt +nan.0) 2) (pow U 2)) 1) into (* (pow (sqrt +nan.0) 2) (pow U 2))
* [misc]backup-simplify:  Simplify (* +nan.0 (* (pow (sqrt +nan.0) 2) (pow U 2))) into (* +nan.0 (* (pow (sqrt +nan.0) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (- (* +nan.0 (* (pow (sqrt +nan.0) 2) (pow U 2)))) into (- (* +nan.0 (* (pow (sqrt +nan.0) 2) (pow U 2))))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (* (pow (sqrt +nan.0) 2) (pow U 2)))) in U
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (* (pow (sqrt +nan.0) 2) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of +nan.0 in U
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]taylor:  Taking taylor expansion of (* (pow (sqrt +nan.0) 2) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in U
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in U
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (sqrt +nan.0)) in U
* [misc]taylor:  Taking taylor expansion of (sqrt +nan.0) in U
* [misc]taylor:  Taking taylor expansion of +nan.0 in U
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 2)
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]approximate:  Taking taylor expansion of (* (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in U
* [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 -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))) into (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))) into (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in K
* [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 -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1 1) into 1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ 1 2) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 K) 2)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/4)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/4)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (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]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 (* (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 (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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 (* (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]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 (* (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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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 (* (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]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 (* (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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 J) -2) (cos (/ (/ 1 K) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 J) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 K) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 K) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1 K) into (/ 1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ 1 K) 2) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* (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]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 (* (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 (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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 (* (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]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 (* (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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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 (* (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]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 (* (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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (* 1 -2) into -2
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 K))) 1) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 K))) 1) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 K))) 1) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* -2 (cos (/ 1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (* 0 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (* -2 (cos (/ 1/2 K))) into (* -2 (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 1/2 (* (cos (/ 1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/32 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 1/2 (* (cos (/ 1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/32 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ 1/2 K)) U)) (/ 1/2 (* (cos (/ 1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))) into (- (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) (/ 1/32 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* (- (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) 1))) into (- (* 3/16 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) (/ 1/32 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* (- (* 3/16 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) 1))) into (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) in K
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (cos (/ 1/2 K)) (pow U 2)) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in K
* [misc]taylor:  Taking taylor expansion of 1/2 in K
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ 1/2 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (exp (* 2 (log U))) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) (pow U 2)) into (* (cos (/ 1/2 K)) (pow U 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) into (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) into (/ 1/4 (* (cos (/ 1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (- (/ 1/4 (* (cos (/ 1/2 K)) (pow U 2)))) into (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))))
* [misc]taylor:  Taking taylor expansion of (- (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) in U
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (/ 1/2 K)) (pow U 2)))) in U
* [misc]taylor:  Taking taylor expansion of 1/4 in U
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (cos (/ 1/2 K)) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ 1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ 1/2 K) in U
* [misc]taylor:  Taking taylor expansion of 1/2 in U
* [misc]backup-simplify:  Simplify 1/2 into 1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ 1/2 K) into (/ 1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ 1/2 K)) into (sin (/ 1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]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 (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (cos (/ 1/2 K))) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ 1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/32 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ 1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/32 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 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 (/ 0 1)))) 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 (- (+ (* (/ 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 (* (cos (/ 1/2 K)) U)) (/ 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ 1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ 1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 K) (/ 0 K)) (* 0 (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ 1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- (+ (* 1 (/ 0 1)) (* 0 (/ 0 1)) (* 0 (/ 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (+ (* 0 (/ 1/16 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (+ (* 0 (/ 1/32 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* (- (* 1/8 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* -2 (cos (/ 1/2 K))) 0) (+ (* 0 (/ 1/32 (* (pow (cos (/ 1/2 K)) 2) (pow U 2)))) (+ (* (- (* 3/16 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) 0) (* 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log U))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (* 0 (pow U 2))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ 1/2 K)) (pow U 2))) (/ 0 (* (cos (/ 1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (* (cos (/ 1/2 K)) (pow U 2))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ 1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ 1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ 1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (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/4 0) (+ (* 0 0) (* 0 (/ 1 (cos (/ 1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* -2 (cos (/ 1/2 (/ 1 K)))) (* 1 (* 1 (/ 1 (/ 1 J))))) into (* -2 (* (cos (* 1/2 K)) J))
* [misc]approximate:  Taking taylor expansion of (* (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in (J K U) around 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in U
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in U
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in U
* [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 -2 in U
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in U
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in U
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in U
* [misc]taylor:  Taking taylor expansion of (- K) in U
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))) into (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))) into (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in K
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in K
* [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 -2 in K
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in K
* [misc]taylor:  Taking taylor expansion of (- K) in K
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (/ 1 -1) into -1
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ -1 2) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ (/ 1 (- K)) 2)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* (* (/ 1 (- J)) -2) (cos (/ (/ 1 (- K)) 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (/ 1 (- J)) -2) in J
* [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 -2 in J
* [misc]backup-simplify:  Simplify -2 into -2
* [misc]taylor:  Taking taylor expansion of (cos (/ (/ 1 (- K)) 2)) in J
* [misc]taylor:  Taking taylor expansion of (/ (/ 1 (- K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (/ 1 (- K)) in J
* [misc]taylor:  Taking taylor expansion of (- K) in J
* [misc]taylor:  Taking taylor expansion of K in J
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (/ 1 (- K)) into (/ -1 K)
* [misc]taylor:  Taking taylor expansion of 2 in J
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]backup-simplify:  Simplify (/ (/ -1 K) 2) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (sqrt (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 (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (* -1 -2) into 2
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 K))) 1) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 K))) 1) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 K))) 1) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (* 2 (cos (/ -1/2 K))) in U
* [misc]taylor:  Taking taylor expansion of 2 in U
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (* 0 -2)) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (* 0 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (* 2 (cos (/ -1/2 K))) into (* 2 (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/32 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/32 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (* (/ 1/2 (* (cos (/ -1/2 K)) U)) (/ 1/2 (* (cos (/ -1/2 K)) U))) into (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ 0 (/ 1/4 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) into (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))
* [misc]backup-simplify:  Simplify (/ (- (* 1/4 (/ 1 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (pow 0 2) (+)) (* 2 1)) into (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (/ (- (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (+ (* 0 0) (* 0 -2))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1))) into (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) (/ 1/32 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) 1))) into (* 3/16 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) (/ 1/32 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* (* 3/16 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) 1))) into (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))
* [misc]taylor:  Taking taylor expansion of (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) in K
* [misc]taylor:  Taking taylor expansion of 1/4 in K
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) in K
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in K
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in K
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in K
* [misc]taylor:  Taking taylor expansion of -1/2 in K
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (/ -1/2 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log U))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log U)) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log U) in K
* [misc]taylor:  Taking taylor expansion of U in K
* [misc]backup-simplify:  Simplify U into U
* [misc]backup-simplify:  Simplify (log U) into (log U)
* [misc]backup-simplify:  Simplify (* 2 (log U)) into (* 2 (log U))
* [misc]backup-simplify:  Simplify (exp (* 2 (log U))) into (pow U 2)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) (pow U 2)) into (* (cos (/ -1/2 K)) (pow U 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) into (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]backup-simplify:  Simplify (* 1/4 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) into (/ 1/4 (* (cos (/ -1/2 K)) (pow U 2)))
* [misc]taylor:  Taking taylor expansion of (/ 1/4 (* (cos (/ -1/2 K)) (pow U 2))) in U
* [misc]taylor:  Taking taylor expansion of 1/4 in U
* [misc]backup-simplify:  Simplify 1/4 into 1/4
* [misc]taylor:  Taking taylor expansion of (* (cos (/ -1/2 K)) (pow U 2)) in U
* [misc]taylor:  Taking taylor expansion of (cos (/ -1/2 K)) in U
* [misc]taylor:  Taking taylor expansion of (/ -1/2 K) in U
* [misc]taylor:  Taking taylor expansion of -1/2 in U
* [misc]backup-simplify:  Simplify -1/2 into -1/2
* [misc]taylor:  Taking taylor expansion of K in U
* [misc]backup-simplify:  Simplify K into K
* [misc]backup-simplify:  Simplify (/ -1/2 K) into (/ -1/2 K)
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (sin (/ -1/2 K)) into (sin (/ -1/2 K))
* [misc]taylor:  Taking taylor expansion of (pow U 2) in U
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]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/4 (cos (/ -1/2 K))) into (/ 1/4 (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 (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/4 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (* 0 0)) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (cos (/ -1/2 K)) U)) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ -1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/32 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (cos (/ -1/2 K)) U)) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ -1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/32 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ (* 1 0) (+ (* 0 0) (+ (* 0 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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (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 (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)))) 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) 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 (* (cos (/ -1/2 K)) U)) (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (/ 1/2 (* (cos (/ -1/2 K)) U)) 0) (* 0 (/ 1/2 (* (cos (/ -1/2 K)) U)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/8 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (/ (- 0 (+ (* 2 (* 0 (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2))))))) (* 2 1)) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* -1 (/ (pow 0 1) 1) (/ (pow 0 1) 1)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- K) into (- K)
* [misc]backup-simplify:  Simplify (- (+ (* (/ -1 K) (/ 0 (- K))) (* 0 (/ 0 (- K))) (* 0 (/ 0 (- K))))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 2) (+ (* (/ -1/2 K) (/ 0 2)) (* 0 (/ 0 2)) (* 0 (/ 0 2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 3) 6)) 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (+ (* 0 0) (* 0 0)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (- 1) into -1
* [misc]backup-simplify:  Simplify (- (+ (* -1 (/ 0 -1)) (* 0 (/ 0 -1)) (* 0 (/ 0 -1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* -1 0) (+ (* 0 0) (+ (* 0 0) (* 0 -2)))) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (+ (* 0 (/ 1/16 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* 0 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (+ (* 0 (/ 1/32 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* (* 1/8 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) 0) (* 0 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (* 2 (cos (/ -1/2 K))) 0) (+ (* 0 (/ 1/32 (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) (+ (* (* 3/16 (/ 1 (* (cos (/ -1/2 K)) (pow U 2)))) 0) (* 0 1)))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow U 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log U))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log U))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (* 0 (pow U 2))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (* (cos (/ -1/2 K)) (pow U 2))) (/ 0 (* (cos (/ -1/2 K)) (pow U 2)))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/4 0) (* 0 (/ 1 (* (cos (/ -1/2 K)) (pow U 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K)))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in U
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* -1 (/ (pow 0 2) 2)) 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 K) (+ (* (/ -1/2 K) (/ 0 K)) (* 0 (/ 0 K)))) into 0
* [misc]backup-simplify:  Simplify (+ 0 (* 1 (/ (pow 0 1) 1))) into 0
* [misc]backup-simplify:  Simplify (+ (* (sin (/ -1/2 K)) 0) (+ (* 0 0) (* 0 0))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (+ (* (cos (/ -1/2 K)) 0) (+ (* 0 0) (* 0 1))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ 1/4 (cos (/ -1/2 K))) (/ 0 (cos (/ -1/2 K)))) (* 0 (/ 0 (cos (/ -1/2 K)))))) into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (* (* 2 (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* 1 (/ 1 (/ 1 (- J)))))) into (* -2 (* (cos (* 1/2 K)) J))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (log1p (expm1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (expm1 (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 (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 2 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (expm1 (log1p (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (log1p (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 (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 3 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1/2))))>
* * * * [misc]progress:  [ 4 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (pow (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1))))>
* * * * [misc]progress:  [ 5 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (exp (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (log (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 (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 6 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (log (exp (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 7 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (* (* (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))))))))))>
* [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 (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 8 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (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))))))))))>
* [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))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (30 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (49 enodes)
* * [misc]simplify:  iters left: 1 (50 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 9 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (* (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))))))))))>
* [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))))))
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (sqrt (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 (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 10 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 11 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (* (sqrt 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [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 (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 12 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 13 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (fabs (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* * * * [misc]progress:  [ 14 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (* 1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* * * * [misc]progress:  [ 15 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (log1p (expm1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (expm1 (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 (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 16 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (expm1 (log1p (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (log1p (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 (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 17 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1/2))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* * * * [misc]progress:  [ 18 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (pow (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* * * * [misc]progress:  [ 19 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (exp (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (log (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 (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 20 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (log (exp (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 21 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (* (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 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [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 (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 22 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (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 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [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))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (30 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (49 enodes)
* * [misc]simplify:  iters left: 1 (50 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 23 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (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 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [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))))))
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (sqrt (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 (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 24 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (sqrt (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))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 25 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (sqrt 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [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 (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 26 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (sqrt (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))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 27 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (fabs (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* * * * [misc]progress:  [ 28 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* 1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* * * * [misc]progress:  [ 29 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (log1p (expm1 (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))))))))>
* [enter]simplify:  Simplifying (expm1 (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 (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 30 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (expm1 (log1p (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))))))))>
* [enter]simplify:  Simplifying (log1p (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 (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 31 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1/2)) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* * * * [misc]progress:  [ 32 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (pow (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1)) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* * * * [misc]progress:  [ 33 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (exp (log (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))))))))>
* [enter]simplify:  Simplifying (log (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 (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 34 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (log (exp (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))))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 35 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (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)))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [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 (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 36 / 86 ] simplifiying candidate #<alt-delta (λ (J K 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)))))) (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))))))))>
* [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))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (30 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (49 enodes)
* * [misc]simplify:  iters left: 1 (50 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 37 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (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)))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [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))))))
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (sqrt (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 (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 38 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (* (sqrt (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))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 39 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (* (sqrt 1) (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))))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [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 (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 40 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (* (sqrt (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))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 41 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (fabs (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))))))))>
* * * * [misc]progress:  [ 42 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (* 1 (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))))))))>
* * * * [misc]progress:  [ 43 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (log1p (expm1 (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))))>
* [enter]simplify:  Simplifying (expm1 (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (97 enodes)
* * [misc]simplify:  iters left: 3 (243 enodes)
* [exit]simplify:  Simplified to (expm1 (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (expm1 (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 44 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (expm1 (log1p (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))))>
* [enter]simplify:  Simplifying (log1p (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (97 enodes)
* * [misc]simplify:  iters left: 3 (243 enodes)
* [exit]simplify:  Simplified to (log1p (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log1p (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 45 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) 1))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (96 enodes)
* * [misc]simplify:  iters left: 3 (233 enodes)
* * [misc]simplify:  iters left: 2 (485 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 46 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) 1))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (96 enodes)
* * [misc]simplify:  iters left: 3 (233 enodes)
* * [misc]simplify:  iters left: 2 (485 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 47 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) 1))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (96 enodes)
* * [misc]simplify:  iters left: 3 (233 enodes)
* * [misc]simplify:  iters left: 2 (485 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 48 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) 1))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (96 enodes)
* * [misc]simplify:  iters left: 3 (233 enodes)
* * [misc]simplify:  iters left: 2 (485 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 49 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (pow (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) 1))>
* * * * [misc]progress:  [ 50 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (+ (+ (+ (log (* J -2)) (log (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (+ (+ (+ (+ (log (* J -2)) (log (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (43 enodes)
* * [misc]simplify:  iters left: 4 (86 enodes)
* * [misc]simplify:  iters left: 3 (198 enodes)
* * [misc]simplify:  iters left: 2 (483 enodes)
* [exit]simplify:  Simplified to (+ (+ (+ (log (cos (/ K 2))) (log (* -2 J))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (+ (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (+ (+ (+ (log (cos (/ K 2))) (log (* -2 J))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (+ (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 51 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (+ (+ (log (* (* J -2) (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (+ (+ (+ (log (* (* J -2) (cos (/ K 2)))) (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (22 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (77 enodes)
* * [misc]simplify:  iters left: 3 (147 enodes)
* * [misc]simplify:  iters left: 2 (327 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (* (* -2 J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (+ (+ (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (+ (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (* (* -2 J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 52 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (+ (log (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (+ (+ (log (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (41 enodes)
* * [misc]simplify:  iters left: 4 (80 enodes)
* * [misc]simplify:  iters left: 3 (162 enodes)
* * [misc]simplify:  iters left: 2 (359 enodes)
* [exit]simplify:  Simplified to (+ (+ (log (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))) (log (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (+ (+ (log (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))) (log (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 53 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (+ (log (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (+ (log (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (91 enodes)
* * [misc]simplify:  iters left: 3 (212 enodes)
* [exit]simplify:  Simplified to (+ (log (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* -2 J))) (log (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (+ (log (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* -2 J))) (log (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cos (/ K 2))))))
* * * * [misc]progress:  [ 54 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (exp (log (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))))>
* [enter]simplify:  Simplifying (log (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (107 enodes)
* * [misc]simplify:  iters left: 3 (305 enodes)
* [exit]simplify:  Simplified to (log (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))
* * * * [misc]progress:  [ 55 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (log (exp (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))))>
* [enter]simplify:  Simplifying (exp (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (41 enodes)
* * [misc]simplify:  iters left: 4 (105 enodes)
* * [misc]simplify:  iters left: 3 (274 enodes)
* [exit]simplify:  Simplified to (exp (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (exp (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 56 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (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 (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)))))))) (* (* (sqrt (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))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* (* (* J -2) (* J -2)) (* J -2)) (* (* (cos (/ K 2)) (cos (/ K 2))) (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 (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)))))))) (* (* (sqrt (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))))))))
* * [misc]simplify:  iters left: 6 (27 enodes)
* * [misc]simplify:  iters left: 5 (67 enodes)
* * [misc]simplify:  iters left: 4 (246 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)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* -2 J) 3)))))
* [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)) (cos (/ K 2))) (* (cos (/ K 2)) (pow (* -2 J) 3)))))
* * * * [misc]progress:  [ 57 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (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 (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)))))))) (* (* (sqrt (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))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* (* (* J -2) (cos (/ K 2))) (* (* J -2) (cos (/ K 2)))) (* (* J -2) (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 (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)))))))) (* (* (sqrt (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))))))))
* * [misc]simplify:  iters left: 6 (25 enodes)
* * [misc]simplify:  iters left: 5 (62 enodes)
* * [misc]simplify:  iters left: 4 (208 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* (* -2 J) (cos (/ K 2))) (* (* -2 J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* (* -2 J) (cos (/ K 2))) (* (* -2 J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 58 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (* J -2) (cos (/ K 2))) (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))))))) (sqrt (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))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (* J -2) (cos (/ K 2))) (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))))))) (sqrt (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))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (54 enodes)
* * [misc]simplify:  iters left: 4 (185 enodes)
* [exit]simplify:  Simplified to (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* -2 J) (cos (/ K 2))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (* (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* -2 J) (cos (/ K 2))) (* (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) (* (* -2 J) (cos (/ K 2))))))
* * * * [misc]progress:  [ 59 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (* (* (* (* J -2) (cos (/ K 2))) (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)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (* (* (* (* J -2) (cos (/ K 2))) (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)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (52 enodes)
* * [misc]simplify:  iters left: 4 (156 enodes)
* [exit]simplify:  Simplified to (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* -2 J) (cos (/ K 2)))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* -2 J) (cos (/ K 2)))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* -2 J) (cos (/ K 2)))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* -2 J) (cos (/ K 2)))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* -2 J) (cos (/ K 2)))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* -2 J) (cos (/ K 2)))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 60 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))) (cbrt (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))) (cbrt (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))))>
* [enter]simplify:  Simplifying (* (cbrt (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))) (cbrt (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (98 enodes)
* * [misc]simplify:  iters left: 3 (244 enodes)
* [exit]simplify:  Simplified to (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (cbrt (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (97 enodes)
* * [misc]simplify:  iters left: 3 (243 enodes)
* [exit]simplify:  Simplified to (cbrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (cbrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 61 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (cbrt (* (* (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))) (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))) (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))) (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (47 enodes)
* * [misc]simplify:  iters left: 4 (134 enodes)
* [exit]simplify:  Simplified to (pow (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) 3)
* [exit]simplify:  Simplified to (pow (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) 3)
* * * * [misc]progress:  [ 62 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (sqrt (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))) (sqrt (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))))>
* [enter]simplify:  Simplifying (sqrt (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (97 enodes)
* * [misc]simplify:  iters left: 3 (243 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (sqrt (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (97 enodes)
* * [misc]simplify:  iters left: 3 (243 enodes)
* [exit]simplify:  Simplified to (sqrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (* (* (* -2 J) (cos (/ K 2))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 63 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* 1 (* (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))>
* * * * [misc]progress:  [ 64 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (107 enodes)
* * [misc]simplify:  iters left: 3 (362 enodes)
* [exit]simplify:  Simplified to (* (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))))) (* (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))))))
* [exit]simplify:  Simplified to (* (* (* (* (* -2 J) (cos (/ K 2))) (sqrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))))) (* (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 65 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (sqrt (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (* (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 (22 enodes)
* * [misc]simplify:  iters left: 5 (42 enodes)
* * [misc]simplify:  iters left: 4 (98 enodes)
* * [misc]simplify:  iters left: 3 (250 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (fabs (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (* (sqrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (fabs (cbrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 66 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (sqrt (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* * [misc]simplify:  iters left: 6 (23 enodes)
* * [misc]simplify:  iters left: 5 (43 enodes)
* * [misc]simplify:  iters left: 4 (99 enodes)
* * [misc]simplify:  iters left: 3 (258 enodes)
* [exit]simplify:  Simplified to (* (sqrt (fabs (cbrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (* (sqrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (sqrt (fabs (cbrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))) (* (sqrt (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 67 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (95 enodes)
* * [misc]simplify:  iters left: 3 (274 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 68 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt 1))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt 1)))
* * [misc]simplify:  iters left: 6 (21 enodes)
* * [misc]simplify:  iters left: 5 (40 enodes)
* * [misc]simplify:  iters left: 4 (96 enodes)
* * [misc]simplify:  iters left: 3 (269 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* -2 J) (sqrt (sqrt 1))) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* (* -2 J) (sqrt (sqrt 1))) (cos (/ K 2)))))
* * * * [misc]progress:  [ 69 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (95 enodes)
* * [misc]simplify:  iters left: 3 (274 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 70 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt 1)) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt 1))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (95 enodes)
* * [misc]simplify:  iters left: 3 (274 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (/ K 2)) (* (sqrt 1) (* -2 J)))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (/ K 2)) (* (sqrt 1) (* -2 J)))))
* * * * [misc]progress:  [ 71 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (95 enodes)
* * [misc]simplify:  iters left: 3 (274 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 72 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) 1) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) 1)
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (85 enodes)
* * [misc]simplify:  iters left: 3 (205 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* -2 J) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (* (* -2 J) (cos (/ K 2)))))
* * * * [misc]progress:  [ 73 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (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 (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 (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 74 / 86 ] simplifiying candidate #<alt-delta (λ (J K U) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* * * * [misc]progress:  [ 75 / 86 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt 1)))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt 1))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (95 enodes)
* * [misc]simplify:  iters left: 3 (274 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (/ K 2)) (* (sqrt 1) (* -2 J)))))
* * * * [misc]progress:  [ 76 / 86 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J)))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J))))
* * * * [misc]progress:  [ 77 / 86 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J)))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J))))
* * * * [misc]progress:  [ 78 / 86 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt 1)) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt 1)) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (95 enodes)
* * [misc]simplify:  iters left: 3 (274 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (/ K 2)) (* (sqrt 1) (* -2 J)))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 79 / 86 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J)))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J)))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 80 / 86 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J)))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J)))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 81 / 86 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) 1) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) 1) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (38 enodes)
* * [misc]simplify:  iters left: 4 (78 enodes)
* * [misc]simplify:  iters left: 3 (147 enodes)
* * [misc]simplify:  iters left: 2 (298 enodes)
* * [misc]simplify:  iters left: 1 (380 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))
* * * * [misc]progress:  [ 82 / 86 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 83 / 86 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))>
* [enter]simplify:  Simplifying (* (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 84 / 86 ] simplifiying candidate #<alt-event (λ (J K U) 0)>
* [enter]simplify:  Simplifying 0
* * [misc]simplify:  iters left: 0 (1 enodes)
* [exit]simplify:  Simplified to 0
* * * * [misc]progress:  [ 85 / 86 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J -2))
* * * * [misc]progress:  [ 86 / 86 ] simplifiying candidate #<alt-event (λ (J K U) (* -2 (* (cos (* 1/2 K)) J)))>
* [enter]simplify:  Simplifying (* -2 (* (cos (* 1/2 K)) J))
* * [misc]simplify:  iters left: 6 (8 enodes)
* * [misc]simplify:  iters left: 5 (13 enodes)
* * [misc]simplify:  iters left: 4 (19 enodes)
* * [misc]simplify:  iters left: 3 (20 enodes)
* [exit]simplify:  Simplified to (* (cos (* K 1/2)) (* J -2))
* * * [misc]progress:  adding candidates to table
* * [misc]progress:  iteration 4 / 4
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating rewritten candidates
* * * * [misc]progress:  [ 1 / 4 ] rewriting at (2 2 2 1)
* * * * [misc]progress:  [ 2 / 4 ] rewriting at (2 2 1 1)
* * * * [misc]progress:  [ 3 / 4 ] rewriting at (2 1 2)
* * * * [misc]progress:  [ 4 / 4 ] rewriting at (2 2)
* * * [misc]progress:  generating series expansions
* * * * [misc]progress:  [ 1 / 4 ] generating series at (2 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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) 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 (* (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]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 (* (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]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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 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]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 2 1 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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) 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 (* (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]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 (* (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]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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 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]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 1 2)
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) 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 (* (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]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 (* (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]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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 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]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:  [ 4 / 4 ] generating series at (2 2)
* [misc]approximate:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) in (U J K) around 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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 (* 1/4 (/ (pow U 2) (pow J 2))))
* [misc]backup-simplify:  Simplify (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2))))) into (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))
* [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 (* 1/4 (/ (pow U 2) (pow J 2))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)) into (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ 1 (* 1/4 (/ (pow U 2) (pow J 2)))) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))) into (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ U (cos (* 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (/ (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))) into (* (sqrt (/ U (cos (* 1/2 K)))) (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ U (cos (* 1/2 K)))) 2) (+)) (* 2 0)) into (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2)))
* [misc]backup-simplify:  Simplify (/ (* +nan.0 (/ (pow U 2) (pow (cos (* 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ U (cos (* 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow U 3) (pow (cos (* 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]backup-simplify:  Simplify (* 1 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 in K
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify 1 into 1
* [misc]backup-simplify:  Simplify (+ (* 1 0) (* 0 1)) into 0
* [misc]taylor:  Taking taylor expansion of 0 in J
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify (+ (* 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/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/32 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [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/16 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) (pow 0 2) (+)) (* 2 1)) into (/ 1/32 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))
* [misc]backup-simplify:  Simplify (+ (* 1 (/ 1/32 (* (pow (cos (* 1/2 K)) 2) (pow J 2)))) (+ (* 0 0) (* (/ 1/32 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) 1))) into (* 1/16 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))))
* [misc]taylor:  Taking taylor expansion of (* 1/16 (/ 1 (* (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 (/ 1 (* (pow (cos (* 1/2 K)) 2) (pow J 2))) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (* 1/2 K)) 2) (pow J 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (* 1/2 K)) 2) in J
* [misc]taylor:  Taking taylor expansion of (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 (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 (+ (* 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 (+ (* -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 (+ (* (pow (cos (* 1/2 K)) 2) 0) (* 0 1)) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (- (+ (* (/ 1 (pow (cos (* 1/2 K)) 2)) (/ 0 (pow (cos (* 1/2 K)) 2))) (* 0 (/ 0 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]backup-simplify:  Simplify (+ (* 1/16 0) (+ (* 0 0) (* 0 (/ 1 (pow (cos (* 1/2 K)) 2))))) into 0
* [misc]taylor:  Taking taylor expansion of 0 in K
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]backup-simplify:  Simplify 0 into 0
* [misc]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 (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (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 (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/4)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/4)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow U 2) (pow (cos (/ 1/2 K)) 2)))) 1) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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 (* (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]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 (* (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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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 (* (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]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 (* (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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))) into (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))) into (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))) into (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 U) 2) (/ 1 J)) (cos (/ (/ 1 K) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))) into (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ 1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]backup-simplify:  Simplify (* (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.0)) (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.0))) into (/ (* (pow (sqrt +nan.0) 2) J) (cos (/ 1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ (* (pow (sqrt +nan.0) 2) J) (cos (/ 1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (sqrt +nan.0) 2) J) in J
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) 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 (sqrt +nan.0)) in J
* [misc]taylor:  Taking taylor expansion of (sqrt +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 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 (/ 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 (* (pow (sqrt +nan.0) 2) 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt +nan.0) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (sqrt +nan.0)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (sqrt +nan.0)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (sqrt +nan.0) 2) 1) (* 0 0)) into (pow (sqrt +nan.0) 2)
* [misc]backup-simplify:  Simplify (* (cos (/ 1/2 K)) 1) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ 1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ 1/2 K)) 0) into (cos (/ 1/2 K))
* [misc]backup-simplify:  Simplify (/ (pow (sqrt +nan.0) 2) (cos (/ 1/2 K))) into (/ (pow (sqrt +nan.0) 2) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.0)) (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))) (* (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.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 (/ (pow (sqrt +nan.0) 2) (cos (/ 1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (sqrt +nan.0)) in K
* [misc]taylor:  Taking taylor expansion of (sqrt +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 (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 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 (/ (pow (sqrt +nan.0) 2) (cos (/ 1/2 K))) into (/ (pow (sqrt +nan.0) 2) (cos (/ 1/2 K)))
* [misc]backup-simplify:  Simplify (/ (pow (sqrt +nan.0) 2) (cos (/ 1/2 K))) into (/ (pow (sqrt +nan.0) 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]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 (/ (- (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))))) (pow (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) 2) (+)) (* 2 (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.0)))) into (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J)))))) (sqrt +nan.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 (/ (- (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))))) (pow (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) 2) (+)) (* 2 (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.0)))) into (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J)))))) (sqrt +nan.0))))
* [misc]backup-simplify:  Simplify (+ (* (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.0)) (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J)))))) (sqrt +nan.0))))) (+ (* (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))) (* (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J)))))) (sqrt +nan.0)))) (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.0))))) into (- (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J)))))))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J))))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 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 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2))) 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) (pow (sqrt +nan.0) 2)) 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 (sqrt +nan.0) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) 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 (sqrt +nan.0)) in J
* [misc]taylor:  Taking taylor expansion of (sqrt +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 2)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)) into (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2))) into (/ 1 (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J)))) in J
* [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]taylor:  Taking taylor expansion of (- (* +nan.0 (/ (cos (/ 1/2 K)) J))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (cos (/ 1/2 K)) J)) 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) 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]backup-simplify:  Simplify (+ (* +nan.0 0) (* 0 (cos (/ 1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (pow 0 2) (+)) (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt +nan.0) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt +nan.0) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (sqrt +nan.0))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (sqrt +nan.0)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (sqrt +nan.0) 2) 0) (+ (* 0 1) (* 0 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))) (+ (* (/ (pow (sqrt +nan.0) 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt +nan.0) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (sqrt +nan.0)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (sqrt +nan.0)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ 1/2 K))) (+ (* (/ (pow (sqrt +nan.0) 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]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 2) (+ (* 2 (* (* +nan.0 (/ J (cos (/ 1/2 K)))) (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))))))))) (* 2 0)) into (* +nan.0 (+ +nan.0 (- (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))))))
* [misc]backup-simplify:  Simplify (/ (- (* +nan.0 (+ +nan.0 (- (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4)))))) (+ (* 2 (* (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J)))))) (sqrt +nan.0)))))))) (* 2 (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.0)))) into (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)))))))))))) (sqrt +nan.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 (/ (- 0 (pow (* +nan.0 (/ (pow J 2) (pow (cos (/ 1/2 K)) 2))) 2) (+ (* 2 (* (* +nan.0 (/ J (cos (/ 1/2 K)))) (* +nan.0 (- (/ (cos (/ 1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))))))))) (* 2 0)) into (* +nan.0 (+ +nan.0 (- (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))))))
* [misc]backup-simplify:  Simplify (/ (- (* +nan.0 (+ +nan.0 (- (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4)))))) (+ (* 2 (* (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J)))))) (sqrt +nan.0)))))))) (* 2 (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.0)))) into (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)))))))))))) (sqrt +nan.0))))
* [misc]backup-simplify:  Simplify (+ (* (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.0)) (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)))))))))))) (sqrt +nan.0))))) (+ (* (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J)))))) (sqrt +nan.0))))) (+ (* (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ 1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ 1/2 K)) J)))))) (sqrt +nan.0)))) (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ 1/2 K)) 3))) (/ 1 (sqrt +nan.0))))) (* (* -1/2 (* (sqrt (/ (cos (/ 1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)))))))))))) (sqrt +nan.0)))) (* (sqrt (/ J (cos (/ 1/2 K)))) (sqrt +nan.0)))))) into (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)))))))))))))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4))))))))))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)))))))))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 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 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2))) in J
* [misc]taylor:  Taking taylor expansion of (pow J 4) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 4 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 4 (log (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 4 in J
* [misc]backup-simplify:  Simplify 4 into 4
* [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 (* 4 (log (cos (/ 1/2 K)))) into (* 4 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 4 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 4)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) 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 (sqrt +nan.0)) in J
* [misc]taylor:  Taking taylor expansion of (sqrt +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 2)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2)) into (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2))) into (/ 1 (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 2)))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4))))))))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)))))))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ 1 (pow (sqrt +nan.0) 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 (/ 1 (pow (sqrt +nan.0) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) 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 (sqrt +nan.0)) in J
* [misc]taylor:  Taking taylor expansion of (sqrt +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (sqrt +nan.0) 2)) into (/ 1 (pow (sqrt +nan.0) 2))
* [misc]taylor:  Taking taylor expansion of (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4))))))))) in J
* [misc]taylor:  Taking taylor expansion of (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)))))))) 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 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4))))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 4) (pow (cos (/ 1/2 K)) 4))) 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 4) (pow (cos (/ 1/2 K)) 4)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 4) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 4 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 4 (log (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 4 in J
* [misc]backup-simplify:  Simplify 4 into 4
* [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 (* 4 (log (cos (/ 1/2 K)))) into (* 4 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 4 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 4)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ 1/2 K)) 4)) into (/ 1 (pow (cos (/ 1/2 K)) 4))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)))) 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 4) (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4))) in J
* [misc]taylor:  Taking taylor expansion of (pow J 4) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 4 (log (cos (/ 1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 4 (log (cos (/ 1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 4 in J
* [misc]backup-simplify:  Simplify 4 into 4
* [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 (* 4 (log (cos (/ 1/2 K)))) into (* 4 (log (cos (/ 1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 4 (log (cos (/ 1/2 K))))) into (pow (cos (/ 1/2 K)) 4)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 4 (log (sqrt +nan.0)))) in J
* [misc]taylor:  Taking taylor expansion of (* 4 (log (sqrt +nan.0))) in J
* [misc]taylor:  Taking taylor expansion of 4 in J
* [misc]backup-simplify:  Simplify 4 into 4
* [misc]taylor:  Taking taylor expansion of (log (sqrt +nan.0)) in J
* [misc]taylor:  Taking taylor expansion of (sqrt +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 4 (log (sqrt +nan.0))) into (* 4 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 4 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 4)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)) into (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4))
* [misc]backup-simplify:  Simplify (/ 1 (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4))) into (/ 1 (* (pow (cos (/ 1/2 K)) 4) (pow (sqrt +nan.0) 4)))
* [misc]backup-simplify:  Simplify (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) into (/ +nan.0 (pow (sqrt +nan.0) 2))
* [misc]backup-simplify:  Simplify (+ +nan.0 0) into (- +nan.0)
* [misc]backup-simplify:  Simplify (- (- +nan.0)) into (- +nan.0)
* [misc]backup-simplify:  Simplify (+ (/ +nan.0 (pow (sqrt +nan.0) 2)) (- +nan.0)) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))
* [misc]backup-simplify:  Simplify (- (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))
* [misc]backup-simplify:  Simplify (+ 0 (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))
* [misc]backup-simplify:  Simplify (- (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0))) in K
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)) in K
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) 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 (/ 1 (pow (sqrt +nan.0) 2)) in K
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (sqrt +nan.0)) in K
* [misc]taylor:  Taking taylor expansion of (sqrt +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 (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (sqrt +nan.0) 2)) into (/ 1 (pow (sqrt +nan.0) 2))
* [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 (/ 1 (pow (sqrt +nan.0) 2))) into (/ +nan.0 (pow (sqrt +nan.0) 2))
* [misc]backup-simplify:  Simplify (- +nan.0) into (- +nan.0)
* [misc]backup-simplify:  Simplify (+ (/ +nan.0 (pow (sqrt +nan.0) 2)) (- +nan.0)) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))
* [misc]backup-simplify:  Simplify (- (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))
* [misc]backup-simplify:  Simplify (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0))) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.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 (+ (* +nan.0 0) (+ (* 0 0) (* 0 (cos (/ 1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (* +nan.0 (/ 1 (pow (cos (/ 1/2 K)) 2))) into (/ +nan.0 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (- (/ +nan.0 (pow (cos (/ 1/2 K)) 2))) into (- (* +nan.0 (/ 1 (pow (cos (/ 1/2 K)) 2))))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ 1 (pow (cos (/ 1/2 K)) 2))) 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 (/ 1 (pow (cos (/ 1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ 1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ 1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (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 (log (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 1) into 1/2
* [misc]backup-simplify:  Simplify (cos (/ 1/2 K)) 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 (pow (cos (/ 1/2 K)) 2))) into (/ +nan.0 (pow (cos (/ 1/2 K)) 2))
* [misc]backup-simplify:  Simplify (- (/ +nan.0 (pow (cos (/ 1/2 K)) 2))) into (- (* +nan.0 (/ 1 (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (- (* +nan.0 (/ 1 (pow (cos (/ 1/2 K)) 2)))) into (- (* +nan.0 (/ 1 (pow (cos (/ 1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- (* +nan.0 (/ 1 (pow (cos (/ 1/2 (/ 1 K))) 2)))) (* 1 (* (pow (/ 1 J) 2) (/ 1 U)))) (+ (* (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0))) (pow (* 1 (* 1 (/ 1 U))) 3)) (* (/ (pow (sqrt +nan.0) 2) (cos (/ 1/2 (/ 1 K)))) (* 1 (* (/ 1 J) 1))))) into (- (/ (pow (sqrt +nan.0) 2) (* (cos (* 1/2 K)) J)) (+ (* +nan.0 (/ 1 (* (pow (sqrt +nan.0) 2) (pow U 3)))) (- (+ (* +nan.0 (/ 1 (pow U 3))) (- (* +nan.0 (/ 1 (* (pow J 2) (* (pow (cos (* 1/2 K)) 2) U)))))))))
* [misc]approximate:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (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 (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in K
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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 (* 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]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 (* 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 (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/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)
* [misc]backup-simplify:  Simplify (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1)) into (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))
* [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 (* U (cos (/ -1/2 K))))) (/ 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 (* 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 (cos (/ -1/2 K)) 2) (pow U 2)))) 1)))) into 0
* [misc]backup-simplify:  Simplify (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (sqrt (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1))))) into 0
* [misc]backup-simplify:  Simplify (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)) into (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/8)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt (pow (+ (* 1/4 (/ (pow J 2) (* (pow (cos (/ -1/2 K)) 2) (pow U 2)))) 1) 1/4)))) into 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt 1) into 1
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt 1))) into 0
* [misc]taylor:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))) into (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))) into (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (* (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2))))))) in U
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))) into (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]taylor:  Taking taylor expansion of (sqrt (sqrt (hypot 1 (/ (/ (/ (/ 1 (- U)) 2) (/ 1 (- J))) (cos (/ (/ 1 (- K)) 2)))))) 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]backup-simplify:  Simplify (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))) into (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.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 (/ (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) (* 2 (sqrt (* +nan.0 (/ J (cos (/ -1/2 K))))))) into (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0))))
* [misc]backup-simplify:  Simplify (* (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.0)) (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.0))) into (/ (* (pow (sqrt +nan.0) 2) J) (cos (/ -1/2 K)))
* [misc]taylor:  Taking taylor expansion of (/ (* (pow (sqrt +nan.0) 2) J) (cos (/ -1/2 K))) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (sqrt +nan.0) 2) J) in J
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) 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 (sqrt +nan.0)) in J
* [misc]taylor:  Taking taylor expansion of (sqrt +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 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 (/ -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 (* (pow (sqrt +nan.0) 2) 0) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt +nan.0) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (sqrt +nan.0)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (sqrt +nan.0)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (sqrt +nan.0) 2) 1) (* 0 0)) into (pow (sqrt +nan.0) 2)
* [misc]backup-simplify:  Simplify (* (cos (/ -1/2 K)) 1) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (* (sin (/ -1/2 K)) 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ (cos (/ -1/2 K)) 0) into (cos (/ -1/2 K))
* [misc]backup-simplify:  Simplify (/ (pow (sqrt +nan.0) 2) (cos (/ -1/2 K))) into (/ (pow (sqrt +nan.0) 2) (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (+ (* (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.0)) (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0))))) (* (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.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 (/ (pow (sqrt +nan.0) 2) (cos (/ -1/2 K))) in K
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (sqrt +nan.0)) in K
* [misc]taylor:  Taking taylor expansion of (sqrt +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 (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 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 (/ (pow (sqrt +nan.0) 2) (cos (/ -1/2 K))) into (/ (pow (sqrt +nan.0) 2) (cos (/ -1/2 K)))
* [misc]backup-simplify:  Simplify (/ (pow (sqrt +nan.0) 2) (cos (/ -1/2 K))) into (/ (pow (sqrt +nan.0) 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]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 (/ (- (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))))) (pow (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) 2) (+)) (* 2 (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.0)))) into (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J)))))) (sqrt +nan.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 (/ (- (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))))) (pow (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) 2) (+)) (* 2 (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.0)))) into (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J)))))) (sqrt +nan.0))))
* [misc]backup-simplify:  Simplify (+ (* (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.0)) (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J)))))) (sqrt +nan.0))))) (+ (* (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0))))) (* (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J)))))) (sqrt +nan.0)))) (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.0))))) into (- (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J)))))))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J))))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J)))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 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 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2))) 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) (pow (sqrt +nan.0) 2)) 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 (sqrt +nan.0) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) 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 (sqrt +nan.0)) in J
* [misc]taylor:  Taking taylor expansion of (sqrt +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 2)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)) into (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2))) into (/ 1 (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J)))) in J
* [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]taylor:  Taking taylor expansion of (- (* +nan.0 (/ (cos (/ -1/2 K)) J))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (cos (/ -1/2 K)) J)) 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) 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]backup-simplify:  Simplify (+ (* +nan.0 0) (* 0 (cos (/ -1/2 K)))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (pow 0 2) (+)) (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (/ (+ (* -1 (/ (* (pow (* 1 0) 2)) (pow (sqrt +nan.0) 2))) (* 1 (/ (* 1 (pow (* 2 0) 1)) (pow (sqrt +nan.0) 1)))) 2) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (+ (* 0 0) (* 0 (log (sqrt +nan.0))))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (sqrt +nan.0)))) (+ (* (/ (pow 0 2) 2)) (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (+ (* (pow (sqrt +nan.0) 2) 0) (+ (* 0 1) (* 0 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))) (+ (* (/ (pow (sqrt +nan.0) 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 (/ (+ (* 1 (/ (* (pow (* 1 0) 1)) (pow (sqrt +nan.0) 1)))) 1) into 0
* [misc]backup-simplify:  Simplify (+ (* 2 0) (* 0 (log (sqrt +nan.0)))) into 0
* [misc]backup-simplify:  Simplify (* (exp (* 2 (log (sqrt +nan.0)))) (+ (* (/ (pow 0 1) 1)))) into 0
* [misc]backup-simplify:  Simplify (- (/ 0 (cos (/ -1/2 K))) (+ (* (/ (pow (sqrt +nan.0) 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]backup-simplify:  Simplify (/ (- 0 (pow (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 2) (+ (* 2 (* (* +nan.0 (/ J (cos (/ -1/2 K)))) (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))))))))) (* 2 0)) into (* +nan.0 (+ +nan.0 (- (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))))))
* [misc]backup-simplify:  Simplify (/ (- (* +nan.0 (+ +nan.0 (- (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4)))))) (+ (* 2 (* (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J)))))) (sqrt +nan.0)))))))) (* 2 (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.0)))) into (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2)))))))))))) (sqrt +nan.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 (/ (- 0 (pow (* +nan.0 (/ (pow J 2) (pow (cos (/ -1/2 K)) 2))) 2) (+ (* 2 (* (* +nan.0 (/ J (cos (/ -1/2 K)))) (* +nan.0 (- (/ (cos (/ -1/2 K)) J) (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))))))))) (* 2 0)) into (* +nan.0 (+ +nan.0 (- (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))))))
* [misc]backup-simplify:  Simplify (/ (- (* +nan.0 (+ +nan.0 (- (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4)))))) (+ (* 2 (* (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J)))))) (sqrt +nan.0)))))))) (* 2 (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.0)))) into (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2)))))))))))) (sqrt +nan.0))))
* [misc]backup-simplify:  Simplify (+ (* (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.0)) (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2)))))))))))) (sqrt +nan.0))))) (+ (* (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0)))) (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J)))))) (sqrt +nan.0))))) (+ (* (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ (pow J 3) (* (pow (cos (/ -1/2 K)) 3) (pow (sqrt +nan.0) 2)))) (- (+ (* +nan.0 (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (- (* +nan.0 (/ (cos (/ -1/2 K)) J)))))) (sqrt +nan.0)))) (* +nan.0 (* (sqrt (/ (pow J 3) (pow (cos (/ -1/2 K)) 3))) (/ 1 (sqrt +nan.0))))) (* (* -1/2 (* (sqrt (/ (cos (/ -1/2 K)) J)) (/ (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2)))))))))))) (sqrt +nan.0)))) (* (sqrt (/ J (cos (/ -1/2 K)))) (sqrt +nan.0)))))) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2)))))))))))))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2))))))))))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2)))))))))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ 1 (pow (sqrt +nan.0) 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 (/ 1 (pow (sqrt +nan.0) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) 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 (sqrt +nan.0)) in J
* [misc]taylor:  Taking taylor expansion of (sqrt +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (sqrt +nan.0) 2)) into (/ 1 (pow (sqrt +nan.0) 2))
* [misc]taylor:  Taking taylor expansion of (- (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2))))))))))) in J
* [misc]taylor:  Taking taylor expansion of (+ +nan.0 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 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 (- (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2))))))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2)))))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 4) (pow (cos (/ -1/2 K)) 4))) 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 4) (pow (cos (/ -1/2 K)) 4)) in J
* [misc]taylor:  Taking taylor expansion of (pow J 4) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 4 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 4 (log (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 4 in J
* [misc]backup-simplify:  Simplify 4 into 4
* [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 (* 4 (log (cos (/ -1/2 K)))) into (* 4 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 4 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 4)
* [misc]backup-simplify:  Simplify (/ 1 (pow (cos (/ -1/2 K)) 4)) into (/ 1 (pow (cos (/ -1/2 K)) 4))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2))))))) in J
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2)))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))) 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 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4))) in J
* [misc]taylor:  Taking taylor expansion of (pow J 4) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 4 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 4 (log (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 4 in J
* [misc]backup-simplify:  Simplify 4 into 4
* [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 (* 4 (log (cos (/ -1/2 K)))) into (* 4 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 4 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 4)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 4 (log (sqrt +nan.0)))) in J
* [misc]taylor:  Taking taylor expansion of (* 4 (log (sqrt +nan.0))) in J
* [misc]taylor:  Taking taylor expansion of 4 in J
* [misc]backup-simplify:  Simplify 4 into 4
* [misc]taylor:  Taking taylor expansion of (log (sqrt +nan.0)) in J
* [misc]taylor:  Taking taylor expansion of (sqrt +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 4 (log (sqrt +nan.0))) into (* 4 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 4 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 4)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)) into (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4))
* [misc]backup-simplify:  Simplify (/ 1 (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4))) into (/ 1 (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 4)))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2))))) in J
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ (pow J 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 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 4) (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2))) in J
* [misc]taylor:  Taking taylor expansion of (pow J 4) in J
* [misc]taylor:  Taking taylor expansion of (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2)) in J
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 4) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 4 (log (cos (/ -1/2 K))))) in J
* [misc]taylor:  Taking taylor expansion of (* 4 (log (cos (/ -1/2 K)))) in J
* [misc]taylor:  Taking taylor expansion of 4 in J
* [misc]backup-simplify:  Simplify 4 into 4
* [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 (* 4 (log (cos (/ -1/2 K)))) into (* 4 (log (cos (/ -1/2 K))))
* [misc]backup-simplify:  Simplify (exp (* 4 (log (cos (/ -1/2 K))))) into (pow (cos (/ -1/2 K)) 4)
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in J
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in J
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) 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 (sqrt +nan.0)) in J
* [misc]taylor:  Taking taylor expansion of (sqrt +nan.0) in J
* [misc]taylor:  Taking taylor expansion of +nan.0 in J
* [misc]backup-simplify:  Simplify +nan.0 into +nan.0
* [misc]backup-simplify:  Simplify (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 2)
* [misc]backup-simplify:  Simplify (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2)) into (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2))
* [misc]backup-simplify:  Simplify (/ 1 (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2))) into (/ 1 (* (pow (cos (/ -1/2 K)) 4) (pow (sqrt +nan.0) 2)))
* [misc]backup-simplify:  Simplify (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) into (/ +nan.0 (pow (sqrt +nan.0) 2))
* [misc]backup-simplify:  Simplify (+ +nan.0 0) into (- +nan.0)
* [misc]backup-simplify:  Simplify (- (- +nan.0)) into (- +nan.0)
* [misc]backup-simplify:  Simplify (+ (/ +nan.0 (pow (sqrt +nan.0) 2)) (- +nan.0)) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))
* [misc]backup-simplify:  Simplify (- (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))
* [misc]taylor:  Taking taylor expansion of (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0))) in K
* [misc]taylor:  Taking taylor expansion of (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)) in K
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) 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 (/ 1 (pow (sqrt +nan.0) 2)) in K
* [misc]taylor:  Taking taylor expansion of (pow (sqrt +nan.0) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (sqrt +nan.0)))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (sqrt +nan.0))) in K
* [misc]taylor:  Taking taylor expansion of 2 in K
* [misc]backup-simplify:  Simplify 2 into 2
* [misc]taylor:  Taking taylor expansion of (log (sqrt +nan.0)) in K
* [misc]taylor:  Taking taylor expansion of (sqrt +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 (sqrt +nan.0) into (sqrt +nan.0)
* [misc]backup-simplify:  Simplify (/ 0 (* 2 (sqrt +nan.0))) into 0
* [misc]backup-simplify:  Simplify (log (sqrt +nan.0)) into (log (sqrt +nan.0))
* [misc]backup-simplify:  Simplify (* 2 (log (sqrt +nan.0))) into (* 2 (log (sqrt +nan.0)))
* [misc]backup-simplify:  Simplify (exp (* 2 (log (sqrt +nan.0)))) into (pow (sqrt +nan.0) 2)
* [misc]backup-simplify:  Simplify (/ 1 (pow (sqrt +nan.0) 2)) into (/ 1 (pow (sqrt +nan.0) 2))
* [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 (/ 1 (pow (sqrt +nan.0) 2))) into (/ +nan.0 (pow (sqrt +nan.0) 2))
* [misc]backup-simplify:  Simplify (- +nan.0) into (- +nan.0)
* [misc]backup-simplify:  Simplify (+ (/ +nan.0 (pow (sqrt +nan.0) 2)) (- +nan.0)) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))
* [misc]backup-simplify:  Simplify (- (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0)))
* [misc]backup-simplify:  Simplify (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0))) into (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.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 (+ (* +nan.0 0) (+ (* 0 0) (* 0 (cos (/ -1/2 K))))) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 0 0) into 0
* [misc]backup-simplify:  Simplify (- 0) into 0
* [misc]backup-simplify:  Simplify (+ 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 (* +nan.0 (/ 1 (pow (cos (/ -1/2 K)) 2))) into (/ +nan.0 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (- (/ +nan.0 (pow (cos (/ -1/2 K)) 2))) into (- (* +nan.0 (/ 1 (pow (cos (/ -1/2 K)) 2))))
* [misc]taylor:  Taking taylor expansion of (- (* +nan.0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) in K
* [misc]taylor:  Taking taylor expansion of (* +nan.0 (/ 1 (pow (cos (/ -1/2 K)) 2))) 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 (/ 1 (pow (cos (/ -1/2 K)) 2)) in K
* [misc]taylor:  Taking taylor expansion of (pow (cos (/ -1/2 K)) 2) in K
* [misc]taylor:  Taking taylor expansion of (exp (* 2 (log (cos (/ -1/2 K))))) in K
* [misc]taylor:  Taking taylor expansion of (* 2 (log (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 (log (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 1) into -1/2
* [misc]backup-simplify:  Simplify (cos (/ -1/2 K)) 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 (pow (cos (/ -1/2 K)) 2))) into (/ +nan.0 (pow (cos (/ -1/2 K)) 2))
* [misc]backup-simplify:  Simplify (- (/ +nan.0 (pow (cos (/ -1/2 K)) 2))) into (- (* +nan.0 (/ 1 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (- (* +nan.0 (/ 1 (pow (cos (/ -1/2 K)) 2)))) into (- (* +nan.0 (/ 1 (pow (cos (/ -1/2 K)) 2))))
* [misc]backup-simplify:  Simplify (+ (* (- (* +nan.0 (/ 1 (pow (cos (/ -1/2 (/ 1 (- K)))) 2)))) (* 1 (* (pow (/ 1 (- J)) 2) (/ 1 (- U))))) (+ (* (- (+ (* +nan.0 (/ 1 (pow (sqrt +nan.0) 2))) (- +nan.0))) (pow (* 1 (* 1 (/ 1 (- U)))) 3)) (* (/ (pow (sqrt +nan.0) 2) (cos (/ -1/2 (/ 1 (- K))))) (* 1 (* (/ 1 (- J)) 1))))) into (- (+ (* +nan.0 (/ 1 (* (pow (sqrt +nan.0) 2) (pow U 3)))) (- (/ (pow (sqrt +nan.0) 2) (* (cos (* 1/2 K)) J)) (+ (* +nan.0 (/ 1 (pow U 3))) (- (* +nan.0 (/ 1 (* (pow J 2) (* (pow (cos (* 1/2 K)) 2) U)))))))))
* * * [misc]progress:  simplifying candidates
* * * * [misc]progress:  [ 1 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (log1p (expm1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [enter]simplify:  Simplifying (expm1 (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 (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 2 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (expm1 (log1p (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [enter]simplify:  Simplifying (log1p (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 (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 3 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1/2)))))>
* * * * [misc]progress:  [ 4 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (pow (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1)))))>
* * * * [misc]progress:  [ 5 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (exp (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [enter]simplify:  Simplifying (log (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 (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 6 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (log (exp (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 7 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (* (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)))))))))))>
* [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 (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 8 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (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)))))))))))>
* [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))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (30 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (49 enodes)
* * [misc]simplify:  iters left: 1 (50 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 9 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (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)))))))))))>
* [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))))))
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (sqrt (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 (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 10 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 11 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (sqrt 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [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 (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 12 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 13 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (fabs (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* * * * [misc]progress:  [ 14 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* 1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* * * * [misc]progress:  [ 15 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (log1p (expm1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (expm1 (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 (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 16 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (expm1 (log1p (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (log1p (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 (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 17 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1/2)) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* * * * [misc]progress:  [ 18 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (pow (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1)) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* * * * [misc]progress:  [ 19 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (exp (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (log (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 (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 20 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (log (exp (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 21 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (* (* (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 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [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 (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 22 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (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 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [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))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (30 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (49 enodes)
* * [misc]simplify:  iters left: 1 (50 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 23 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (* (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 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [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))))))
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (sqrt (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 (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 24 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (* (sqrt (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)))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 25 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (* (sqrt 1) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [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 (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 26 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (* (sqrt (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)))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 27 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (fabs (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* * * * [misc]progress:  [ 28 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (* 1 (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* * * * [misc]progress:  [ 29 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (log1p (expm1 (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)))))))))>
* [enter]simplify:  Simplifying (expm1 (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 (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 30 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (expm1 (log1p (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)))))))))>
* [enter]simplify:  Simplifying (log1p (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 (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 31 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (pow (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))) 1/2)) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* * * * [misc]progress:  [ 32 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (pow (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) 1)) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* * * * [misc]progress:  [ 33 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (exp (log (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)))))))))>
* [enter]simplify:  Simplifying (log (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 (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 34 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (log (exp (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)))))))))>
* [enter]simplify:  Simplifying (exp (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 (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 35 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (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)))))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [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 (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (cbrt (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 (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 36 / 92 ] simplifiying candidate #<alt-delta (λ (J K 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)))))) (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)))))))))>
* [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))))))
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (30 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (49 enodes)
* * [misc]simplify:  iters left: 1 (50 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))
* * * * [misc]progress:  [ 37 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (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)))))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [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))))))
* [exit]simplify:  Simplified to (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (sqrt (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 (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 38 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (* (sqrt (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)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 39 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (* (sqrt 1) (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)))))))))>
* [enter]simplify:  Simplifying (sqrt 1)
* * [misc]simplify:  iters left: 1 (2 enodes)
* [exit]simplify:  Simplified to (sqrt 1)
* [exit]simplify:  Simplified to (sqrt 1)
* [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 (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 40 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (* (sqrt (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)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [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))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 41 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (fabs (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)))))))))>
* * * * [misc]progress:  [ 42 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (* 1 (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)))))))))>
* * * * [misc]progress:  [ 43 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log1p (expm1 (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [enter]simplify:  Simplifying (expm1 (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (35 enodes)
* * [misc]simplify:  iters left: 2 (47 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (expm1 (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 44 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (expm1 (log1p (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [enter]simplify:  Simplifying (log1p (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (35 enodes)
* * [misc]simplify:  iters left: 2 (47 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log1p (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 45 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (pow (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (+ 1/2 1/2))))>
* [enter]simplify:  Simplifying (+ 1/2 1/2)
* * [misc]simplify:  iters left: 2 (2 enodes)
* [exit]simplify:  Simplified to (+ 1/2 1/2)
* [exit]simplify:  Simplified to (+ 1/2 1/2)
* * * * [misc]progress:  [ 46 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (pow (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (+ 1 1))))>
* [enter]simplify:  Simplifying (+ 1 1)
* * [misc]simplify:  iters left: 2 (2 enodes)
* * [misc]simplify:  iters left: 1 (4 enodes)
* [exit]simplify:  Simplified to (+ 1 1)
* [exit]simplify:  Simplified to (+ 1 1)
* * * * [misc]progress:  [ 47 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (pow (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1/2)))>
* [enter]simplify:  Simplifying (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (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 (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 (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 48 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (pow (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) 1)))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (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 (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 (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 49 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (pow (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 2)))>
* * * * [misc]progress:  [ 50 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (pow (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (+ 1 1))))>
* [enter]simplify:  Simplifying (+ 1 1)
* * [misc]simplify:  iters left: 2 (2 enodes)
* * [misc]simplify:  iters left: 1 (4 enodes)
* [exit]simplify:  Simplified to (+ 1 1)
* [exit]simplify:  Simplified to (+ 1 1)
* * * * [misc]progress:  [ 51 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (pow (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) 1)))>
* * * * [misc]progress:  [ 52 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (exp (+ (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [enter]simplify:  Simplifying (+ (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 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 (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (+ (log (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (log (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 53 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (exp (log (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [enter]simplify:  Simplifying (log (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (30 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (49 enodes)
* * [misc]simplify:  iters left: 1 (50 enodes)
* [exit]simplify:  Simplified to (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (log (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 54 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (log (exp (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [enter]simplify:  Simplifying (exp (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (30 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (49 enodes)
* * [misc]simplify:  iters left: 1 (50 enodes)
* [exit]simplify:  Simplified to (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (exp (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 55 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (* (* (* (sqrt (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))))))) (* (* (sqrt (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)))))))))))>
* [enter]simplify:  Simplifying (* (* (* (sqrt (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))))))) (* (* (sqrt (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))))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (27 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (53 enodes)
* * [misc]simplify:  iters left: 2 (69 enodes)
* * [misc]simplify:  iters left: 1 (75 enodes)
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))) (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))) (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2))))))
* * * * [misc]progress:  [ 56 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (cbrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (cbrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (cbrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [enter]simplify:  Simplifying (* (cbrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (cbrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (22 enodes)
* * [misc]simplify:  iters left: 4 (29 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (48 enodes)
* * [misc]simplify:  iters left: 1 (49 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)))))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [enter]simplify:  Simplifying (cbrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (35 enodes)
* * [misc]simplify:  iters left: 2 (47 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 57 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (* (* (* (sqrt (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)))))) (sqrt (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)))))))))))>
* [enter]simplify:  Simplifying (* (* (* (sqrt (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)))))) (sqrt (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))))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (29 enodes)
* * [misc]simplify:  iters left: 4 (42 enodes)
* * [misc]simplify:  iters left: 3 (54 enodes)
* * [misc]simplify:  iters left: 2 (69 enodes)
* * [misc]simplify:  iters left: 1 (75 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2))))) (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2))))) (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 58 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))>
* [enter]simplify:  Simplifying (* (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (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 (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 (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))
* [exit]simplify:  Simplified to (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))
* * * * [misc]progress:  [ 59 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))))>
* [enter]simplify:  Simplifying (sqrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (29 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (48 enodes)
* * [misc]simplify:  iters left: 1 (49 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [enter]simplify:  Simplifying (sqrt (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (29 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (48 enodes)
* * [misc]simplify:  iters left: 1 (49 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 60 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>
* * * * [misc]progress:  [ 61 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* 1 (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* * * * [misc]progress:  [ 62 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (33 enodes)
* * [misc]simplify:  iters left: 3 (40 enodes)
* * [misc]simplify:  iters left: 2 (52 enodes)
* * [misc]simplify:  iters left: 1 (53 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))) (* (cbrt (sqrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))) (* (cbrt (sqrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2))))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))))))
* * * * [misc]progress:  [ 63 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (sqrt (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (* (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 (17 enodes)
* * [misc]simplify:  iters left: 5 (25 enodes)
* * [misc]simplify:  iters left: 4 (31 enodes)
* * [misc]simplify:  iters left: 3 (38 enodes)
* * [misc]simplify:  iters left: 2 (50 enodes)
* * [misc]simplify:  iters left: 1 (51 enodes)
* [exit]simplify:  Simplified to (* (fabs (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (fabs (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 64 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))) (sqrt (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))
* * [misc]simplify:  iters left: 6 (18 enodes)
* * [misc]simplify:  iters left: 5 (26 enodes)
* * [misc]simplify:  iters left: 4 (32 enodes)
* * [misc]simplify:  iters left: 3 (39 enodes)
* * [misc]simplify:  iters left: 2 (51 enodes)
* * [misc]simplify:  iters left: 1 (52 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (fabs (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 65 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (22 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (35 enodes)
* * [misc]simplify:  iters left: 2 (47 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 66 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt 1))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt 1)))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (29 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (48 enodes)
* * [misc]simplify:  iters left: 1 (49 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (sqrt 1)))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (sqrt 1)))
* * * * [misc]progress:  [ 67 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (22 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (35 enodes)
* * [misc]simplify:  iters left: 2 (47 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 68 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt 1)) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt 1))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (22 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (35 enodes)
* * [misc]simplify:  iters left: 2 (47 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (* (sqrt 1) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (sqrt 1) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 69 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (22 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (35 enodes)
* * [misc]simplify:  iters left: 2 (47 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 70 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1)
* * [misc]simplify:  iters left: 6 (14 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* * [misc]simplify:  iters left: 4 (29 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (48 enodes)
* * [misc]simplify:  iters left: 1 (49 enodes)
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))
* * * * [misc]progress:  [ 71 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (* (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (* (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (22 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (35 enodes)
* * [misc]simplify:  iters left: 2 (47 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (* (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (cbrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 72 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (* (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (* (sqrt (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (cbrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (23 enodes)
* * [misc]simplify:  iters left: 4 (29 enodes)
* * [misc]simplify:  iters left: 3 (36 enodes)
* * [misc]simplify:  iters left: 2 (48 enodes)
* * [misc]simplify:  iters left: 1 (49 enodes)
* [exit]simplify:  Simplified to (* (sqrt (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (sqrt (cbrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 73 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (* (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))) (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (* (sqrt (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (cbrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (24 enodes)
* * [misc]simplify:  iters left: 4 (30 enodes)
* * [misc]simplify:  iters left: 3 (37 enodes)
* * [misc]simplify:  iters left: 2 (49 enodes)
* * [misc]simplify:  iters left: 1 (50 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (sqrt (sqrt (cbrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 74 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (22 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (35 enodes)
* * [misc]simplify:  iters left: 2 (47 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 75 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt 1)) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (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 (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 (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 76 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (22 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (35 enodes)
* * [misc]simplify:  iters left: 2 (47 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 77 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt 1) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (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 (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 (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 78 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))
* * [misc]simplify:  iters left: 6 (15 enodes)
* * [misc]simplify:  iters left: 5 (22 enodes)
* * [misc]simplify:  iters left: 4 (28 enodes)
* * [misc]simplify:  iters left: 3 (35 enodes)
* * [misc]simplify:  iters left: 2 (47 enodes)
* * [misc]simplify:  iters left: 1 (48 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* [exit]simplify:  Simplified to (* (sqrt (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 79 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* 1 (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))))>
* [enter]simplify:  Simplifying (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (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 (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 (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* [exit]simplify:  Simplified to (sqrt (hypot 1 (/ (/ U (* 2 J)) (cos (/ K 2)))))
* * * * [misc]progress:  [ 80 / 92 ] simplifiying candidate #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))>
* * * * [misc]progress:  [ 81 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt 1))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt 1)))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (94 enodes)
* * [misc]simplify:  iters left: 3 (288 enodes)
* [exit]simplify:  Simplified to (* (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))) (* (* (cos (/ K 2)) (* (sqrt 1) (* -2 J))) (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 82 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J)))))
* * * * [misc]progress:  [ 83 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J)))))
* * * * [misc]progress:  [ 84 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt 1) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt 1) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (20 enodes)
* * [misc]simplify:  iters left: 5 (39 enodes)
* * [misc]simplify:  iters left: 4 (94 enodes)
* * [misc]simplify:  iters left: 3 (288 enodes)
* [exit]simplify:  Simplified to (* (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (/ K 2)) (* (sqrt 1) (* -2 J)))) (sqrt (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2)))))))
* * * * [misc]progress:  [ 85 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 86 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (* (sqrt (/ +nan.0 (* (cos (* 1/2 K)) J))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 87 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) 1) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) 1) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * [misc]simplify:  iters left: 6 (19 enodes)
* * [misc]simplify:  iters left: 5 (37 enodes)
* * [misc]simplify:  iters left: 4 (79 enodes)
* * [misc]simplify:  iters left: 3 (169 enodes)
* * [misc]simplify:  iters left: 2 (322 enodes)
* * [misc]simplify:  iters left: 1 (426 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ U (* J 2)) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))
* * * * [misc]progress:  [ 88 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 89 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (/ +nan.0 (* (cos (* 1/2 K)) J))) (* (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))
* * * * [misc]progress:  [ 90 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) 1)
* * [misc]simplify:  iters left: 6 (17 enodes)
* * [misc]simplify:  iters left: 5 (33 enodes)
* * [misc]simplify:  iters left: 4 (64 enodes)
* * [misc]simplify:  iters left: 3 (123 enodes)
* * [misc]simplify:  iters left: 2 (234 enodes)
* * [misc]simplify:  iters left: 1 (336 enodes)
* [exit]simplify:  Simplified to (* (sqrt (hypot 1 (/ (/ (/ U J) 2) (cos (/ K 2))))) (* (cos (/ K 2)) (* -2 J)))
* * * * [misc]progress:  [ 91 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (- (/ (pow (sqrt +nan.0) 2) (* (cos (* 1/2 K)) J)) (+ (* +nan.0 (/ 1 (* (pow (sqrt +nan.0) 2) (pow U 3)))) (- (+ (* +nan.0 (/ 1 (pow U 3))) (- (* +nan.0 (/ 1 (* (pow J 2) (* (pow (cos (* 1/2 K)) 2) U)))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (- (/ (pow (sqrt +nan.0) 2) (* (cos (* 1/2 K)) J)) (+ (* +nan.0 (/ 1 (* (pow (sqrt +nan.0) 2) (pow U 3)))) (- (+ (* +nan.0 (/ 1 (pow U 3))) (- (* +nan.0 (/ 1 (* (pow J 2) (* (pow (cos (* 1/2 K)) 2) U))))))))))
* * * * [misc]progress:  [ 92 / 92 ] simplifiying candidate #<alt-event (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (- (+ (* +nan.0 (/ 1 (* (pow (sqrt +nan.0) 2) (pow U 3)))) (- (/ (pow (sqrt +nan.0) 2) (* (cos (* 1/2 K)) J)) (+ (* +nan.0 (/ 1 (pow U 3))) (- (* +nan.0 (/ 1 (* (pow J 2) (* (pow (cos (* 1/2 K)) 2) U)))))))))))>
* [enter]simplify:  Simplifying (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (- (+ (* +nan.0 (/ 1 (* (pow (sqrt +nan.0) 2) (pow U 3)))) (- (/ (pow (sqrt +nan.0) 2) (* (cos (* 1/2 K)) J)) (+ (* +nan.0 (/ 1 (pow U 3))) (- (* +nan.0 (/ 1 (* (pow J 2) (* (pow (cos (* 1/2 K)) 2) U))))))))))
* * * [misc]progress:  adding candidates to table
* [misc]progress:  [Phase 3 of 3] Extracting.
* * [misc]regime-changes:  Finding splitpoints for: (#<alt-event (λ (J K U) (* (* (* -2 J) (cos (/ K 2))) (sqrt (+ 1 (pow (/ U (* (* 2 J) (cos (/ K 2)))) 2)))))> #<alt-delta (λ (J K U) (* (* (cbrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))))> #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (exp (log (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))))> #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))> #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (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)))))))))> #<alt-delta (λ (J K 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))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))> #<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))> #<alt-delta (λ (J K U) (* (* (* (* J -2) (* (cbrt (cos (/ K 2))) (cbrt (cos (/ K 2))))) (cbrt (cos (/ K 2)))) (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))> #<alt-delta (λ (J K U) (* (* (* J -2) (cos (/ K 2))) (hypot 1 (* (/ (/ U 2) (sqrt (cos (/ K 2)))) (/ (/ 1 J) (sqrt (cos (/ K 2))))))))> #<alt-delta (λ (J K U) (* (* (* (* (* J -2) (cos (/ K 2))) (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))))))))> #<alt-delta (λ (J K U) (* (* (* (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (cbrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))> #<alt-delta (λ (J K U) (* (* (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))) (sqrt (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>)
* [misc]regimes:  Found splitpoints: (#s(sp 0 U +nan.0)) , with alts (#<alt-delta (λ (J K U) (* (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2)))))))>)
* [enter]simplify:  Simplifying (* (* (* J -2) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * [misc]simplify:  iters left: 6 (16 enodes)
* * [misc]simplify:  iters left: 5 (21 enodes)
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* [exit]simplify:  Simplified to (* (* (* -2 J) (cos (/ K 2))) (sqrt (hypot 1 (/ (/ (/ U 2) J) (cos (/ K 2))))))
* * * * [misc]points:  Sampling 8010 additional inputs, have 0 / 8000
* * * * [misc]points:  Computing 8010 additional correct outputs
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Setting precision to 128
* * * * [misc]points:  Setting precision to 384
* * * * [misc]points:  Filtering points with unrepresentable outputs